home *** CD-ROM | disk | FTP | other *** search
| Emacs Compiled Lisp | 1998-10-28 | 14.6 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was processed as: Emacs Compiled Lisp
(other/emacsCompiledLisp).
This format is not currently supported by dexvert.
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 45 4c 43 13 00 00 00 | 0a 3b 3b 3b 20 63 6f 6d |;ELC....|.;;; com|
|00000010| 70 69 6c 65 64 20 62 79 | 20 6b 77 7a 68 40 6e 75 |piled by| kwzh@nu|
|00000020| 74 72 69 6d 61 74 2e 67 | 6e 75 2e 61 69 2e 6d 69 |trimat.g|nu.ai.mi|
|00000030| 74 2e 65 64 75 20 6f 6e | 20 57 65 64 20 4a 75 6c |t.edu on| Wed Jul|
|00000040| 20 31 37 20 31 36 3a 35 | 37 3a 33 38 20 31 39 39 | 17 16:5|7:38 199|
|00000050| 36 0a 3b 3b 3b 20 66 72 | 6f 6d 20 66 69 6c 65 20 |6.;;; fr|om file |
|00000060| 2f 67 64 2f 67 6e 75 2f | 65 6d 61 63 73 2f 31 39 |/gd/gnu/|emacs/19|
|00000070| 2e 30 2f 6c 69 73 70 2f | 67 6e 75 73 2d 6b 69 6c |.0/lisp/|gnus-kil|
|00000080| 6c 2e 65 6c 0a 3b 3b 3b | 20 65 6d 61 63 73 20 76 |l.el.;;;| emacs v|
|00000090| 65 72 73 69 6f 6e 20 31 | 39 2e 33 31 2e 39 34 2e |ersion 1|9.31.94.|
|000000a0| 31 2e 0a 3b 3b 3b 20 62 | 79 74 65 63 6f 6d 70 20 |1..;;; b|ytecomp |
|000000b0| 76 65 72 73 69 6f 6e 20 | 46 53 46 20 32 2e 31 30 |version |FSF 2.10|
|000000c0| 0a 3b 3b 3b 20 6f 70 74 | 69 6d 69 7a 61 74 69 6f |.;;; opt|imizatio|
|000000d0| 6e 20 69 73 20 6f 6e 2e | 0a 3b 3b 3b 20 74 68 69 |n is on.|.;;; thi|
|000000e0| 73 20 66 69 6c 65 20 75 | 73 65 73 20 6f 70 63 6f |s file u|ses opco|
|000000f0| 64 65 73 20 77 68 69 63 | 68 20 64 6f 20 6e 6f 74 |des whic|h do not|
|00000100| 20 65 78 69 73 74 20 69 | 6e 20 45 6d 61 63 73 20 | exist i|n Emacs |
|00000110| 31 38 2e 0a 0a 28 69 66 | 20 28 61 6e 64 20 28 62 |18...(if| (and (b|
|00000120| 6f 75 6e 64 70 20 27 65 | 6d 61 63 73 2d 76 65 72 |oundp 'e|macs-ver|
|00000130| 73 69 6f 6e 29 0a 09 20 | 28 6f 72 20 28 61 6e 64 |sion).. |(or (and|
|00000140| 20 28 62 6f 75 6e 64 70 | 20 27 65 70 6f 63 68 3a | (boundp| 'epoch:|
|00000150| 3a 76 65 72 73 69 6f 6e | 29 20 65 70 6f 63 68 3a |:version|) epoch:|
|00000160| 3a 76 65 72 73 69 6f 6e | 29 0a 09 20 20 20 20 20 |:version|).. |
|00000170| 28 73 74 72 69 6e 67 2d | 6c 65 73 73 70 20 65 6d |(string-|lessp em|
|00000180| 61 63 73 2d 76 65 72 73 | 69 6f 6e 20 22 31 39 2e |acs-vers|ion "19.|
|00000190| 32 39 22 29 29 29 0a 20 | 20 20 20 28 65 72 72 6f |29"))). | (erro|
|000001a0| 72 20 22 60 67 6e 75 73 | 2d 6b 69 6c 6c 2e 65 6c |r "`gnus|-kill.el|
|000001b0| 27 20 77 61 73 20 63 6f | 6d 70 69 6c 65 64 20 66 |' was co|mpiled f|
|000001c0| 6f 72 20 45 6d 61 63 73 | 20 31 39 2e 32 39 20 6f |or Emacs| 19.29 o|
|000001d0| 72 20 6c 61 74 65 72 22 | 29 29 0a 0a 0a 28 72 65 |r later"|))...(re|
|000001e0| 71 75 69 72 65 20 28 71 | 75 6f 74 65 20 67 6e 75 |quire (q|uote gnu|
|000001f0| 73 29 29 0a 23 40 33 34 | 20 2a 41 20 68 6f 6f 6b |s)).#@34| *A hook|
|00000200| 20 66 6f 72 20 47 6e 75 | 73 20 6b 69 6c 6c 20 66 | for Gnu|s kill f|
|00000210| 69 6c 65 20 6d 6f 64 65 | 2e 1f 0a 28 64 65 66 76 |ile mode|...(defv|
|00000220| 61 72 20 67 6e 75 73 2d | 6b 69 6c 6c 2d 66 69 6c |ar gnus-|kill-fil|
|00000230| 65 2d 6d 6f 64 65 2d 68 | 6f 6f 6b 20 6e 69 6c 20 |e-mode-h|ook nil |
|00000240| 28 23 24 20 2e 20 2d 35 | 30 35 29 29 0a 23 40 35 |(#$ . -5|05)).#@5|
|00000250| 39 20 2a 4e 75 6d 62 65 | 72 20 6f 66 20 64 61 79 |9 *Numbe|r of day|
|00000260| 73 20 62 65 66 6f 72 65 | 20 65 78 70 69 72 69 6e |s before| expirin|
|00000270| 67 20 75 6e 75 73 65 64 | 20 6b 69 6c 6c 20 66 69 |g unused| kill fi|
|00000280| 6c 65 20 65 6e 74 72 69 | 65 73 2e 1f 0a 28 64 65 |le entri|es...(de|
|00000290| 66 76 61 72 20 67 6e 75 | 73 2d 6b 69 6c 6c 2d 65 |fvar gnu|s-kill-e|
|000002a0| 78 70 69 72 79 2d 64 61 | 79 73 20 37 20 28 23 24 |xpiry-da|ys 7 (#$|
|000002b0| 20 2e 20 2d 35 39 34 29 | 29 0a 23 40 35 38 20 2a | . -594)|).#@58 *|
|000002c0| 49 66 20 6e 6f 6e 2d 6e | 69 6c 2c 20 77 69 6c 6c |If non-n|il, will|
|000002d0| 20 73 61 76 65 20 6b 69 | 6c 6c 20 66 69 6c 65 73 | save ki|ll files|
|000002e0| 20 61 66 74 65 72 20 70 | 72 6f 63 65 73 73 69 6e | after p|rocessin|
|000002f0| 67 20 74 68 65 6d 2e 1f | 0a 28 64 65 66 76 61 72 |g them..|.(defvar|
|00000300| 20 67 6e 75 73 2d 6b 69 | 6c 6c 2d 73 61 76 65 2d | gnus-ki|ll-save-|
|00000310| 6b 69 6c 6c 2d 66 69 6c | 65 20 6e 69 6c 20 28 23 |kill-fil|e nil (#|
|00000320| 24 20 2e 20 2d 37 30 33 | 29 29 0a 28 62 79 74 65 |$ . -703|)).(byte|
|00000330| 2d 63 6f 64 65 20 22 c0 | c1 21 84 08 00 c2 11 c1 |-code ".|.!......|
|00000340| 0b 42 13 c2 87 22 20 5b | 62 6f 75 6e 64 70 20 67 |.B..." [|boundp g|
|00000350| 6e 75 73 2d 77 69 6e 63 | 6f 6e 66 2d 6b 69 6c 6c |nus-winc|onf-kill|
|00000360| 2d 66 69 6c 65 20 6e 69 | 6c 20 63 75 72 72 65 6e |-file ni|l curren|
|00000370| 74 2d 6c 6f 61 64 2d 6c | 69 73 74 5d 20 32 29 0a |t-load-l|ist] 2).|
|00000380| 28 64 65 66 61 6c 69 61 | 73 20 27 67 6e 75 73 2d |(defalia|s 'gnus-|
|00000390| 72 61 69 73 65 20 27 28 | 6d 61 63 72 6f 20 2e 20 |raise '(|macro . |
|000003a0| 23 5b 28 66 69 65 6c 64 | 20 65 78 70 72 65 73 73 |#[(field| express|
|000003b0| 69 6f 6e 20 6c 65 76 65 | 6c 29 20 22 c0 09 5c 6e |ion leve|l) "..\n|
|000003c0| c3 c4 0d 44 44 c6 42 42 | 42 42 87 22 20 5b 67 6e |...DD.BB|BB." [gn|
|000003d0| 75 73 2d 6b 69 6c 6c 20 | 66 69 65 6c 64 20 65 78 |us-kill |field ex|
|000003e0| 70 72 65 73 73 69 6f 6e | 20 66 75 6e 63 74 69 6f |pression| functio|
|000003f0| 6e 20 67 6e 75 73 2d 73 | 75 6d 6d 61 72 79 2d 72 |n gnus-s|ummary-r|
|00000400| 61 69 73 65 2d 73 63 6f | 72 65 20 6c 65 76 65 6c |aise-sco|re level|
|00000410| 20 28 74 29 5d 20 36 5d | 29 29 0a 28 64 65 66 61 | (t)] 6]|)).(defa|
|00000420| 6c 69 61 73 20 27 67 6e | 75 73 2d 6c 6f 77 65 72 |lias 'gn|us-lower|
|00000430| 20 27 28 6d 61 63 72 6f | 20 2e 20 23 5b 28 66 69 | '(macro| . #[(fi|
|00000440| 65 6c 64 20 65 78 70 72 | 65 73 73 69 6f 6e 20 6c |eld expr|ession l|
|00000450| 65 76 65 6c 29 20 22 c0 | 09 5c 6e c3 c4 c5 0e 06 |evel) ".|.\n.....|
|00000460| 44 44 44 c7 42 42 42 42 | 87 22 20 5b 67 6e 75 73 |DDD.BBBB|." [gnus|
|00000470| 2d 6b 69 6c 6c 20 66 69 | 65 6c 64 20 65 78 70 72 |-kill fi|eld expr|
|00000480| 65 73 73 69 6f 6e 20 66 | 75 6e 63 74 69 6f 6e 20 |ession f|unction |
|00000490| 67 6e 75 73 2d 73 75 6d | 6d 61 72 79 2d 72 61 69 |gnus-sum|mary-rai|
|000004a0| 73 65 2d 73 63 6f 72 65 | 20 2d 20 6c 65 76 65 6c |se-score| - level|
|000004b0| 20 28 74 29 5d 20 37 5d | 29 29 0a 28 62 79 74 65 | (t)] 7]|)).(byte|
|000004c0| 2d 63 6f 64 65 20 22 c0 | c1 21 84 08 00 c2 11 c1 |-code ".|.!......|
|000004d0| 0b 42 13 09 84 1a 00 c4 | c5 0e 06 21 89 11 c7 5c |.B......|...!...\|
|000004e0| 22 88 c2 87 22 20 5b 62 | 6f 75 6e 64 70 20 67 6e |"..." [b|oundp gn|
|000004f0| 75 73 2d 6b 69 6c 6c 2d | 66 69 6c 65 2d 6d 6f 64 |us-kill-|file-mod|
|00000500| 65 2d 6d 61 70 20 6e 69 | 6c 20 63 75 72 72 65 6e |e-map ni|l curren|
|00000510| 74 2d 6c 6f 61 64 2d 6c | 69 73 74 20 67 6e 75 73 |t-load-l|ist gnus|
|00000520| 2d 64 65 66 69 6e 65 2d | 6b 65 79 73 2d 31 20 63 |-define-|keys-1 c|
|00000530| 6f 70 79 2d 6b 65 79 6d | 61 70 20 65 6d 61 63 73 |opy-keym|ap emacs|
|00000540| 2d 6c 69 73 70 2d 6d 6f | 64 65 2d 6d 61 70 20 28 |-lisp-mo|de-map (|
|00000550| 22 03 0b 13 22 20 67 6e | 75 73 2d 6b 69 6c 6c 2d |"..." gn|us-kill-|
|00000560| 66 69 6c 65 2d 6b 69 6c | 6c 2d 62 79 2d 73 75 62 |file-kil|l-by-sub|
|00000570| 6a 65 63 74 20 22 03 0b | 01 22 20 67 6e 75 73 2d |ject "..|." gnus-|
|00000580| 6b 69 6c 6c 2d 66 69 6c | 65 2d 6b 69 6c 6c 2d 62 |kill-fil|e-kill-b|
|00000590| 79 2d 61 75 74 68 6f 72 | 20 22 03 0b 14 22 20 67 |y-author| "..." g|
|000005a0| 6e 75 73 2d 6b 69 6c 6c | 2d 66 69 6c 65 2d 6b 69 |nus-kill|-file-ki|
|000005b0| 6c 6c 2d 62 79 2d 74 68 | 72 65 61 64 20 22 03 0b |ll-by-th|read "..|
|000005c0| 18 22 20 67 6e 75 73 2d | 6b 69 6c 6c 2d 66 69 6c |." gnus-|kill-fil|
|000005d0| 65 2d 6b 69 6c 6c 2d 62 | 79 2d 78 72 65 66 20 22 |e-kill-b|y-xref "|
|000005e0| 03 01 22 20 67 6e 75 73 | 2d 6b 69 6c 6c 2d 66 69 |.." gnus|-kill-fi|
|000005f0| 6c 65 2d 61 70 70 6c 79 | 2d 62 75 66 66 65 72 20 |le-apply|-buffer |
|00000600| 22 03 05 22 20 67 6e 75 | 73 2d 6b 69 6c 6c 2d 66 |".." gnu|s-kill-f|
|00000610| 69 6c 65 2d 61 70 70 6c | 79 2d 6c 61 73 74 2d 73 |ile-appl|y-last-s|
|00000620| 65 78 70 20 22 03 03 22 | 20 67 6e 75 73 2d 6b 69 |exp ".."| gnus-ki|
|00000630| 6c 6c 2d 66 69 6c 65 2d | 65 78 69 74 29 5d 20 33 |ll-file-|exit)] 3|
|00000640| 29 0a 23 40 32 38 30 37 | 20 4d 61 6a 6f 72 20 6d |).#@2807| Major m|
|00000650| 6f 64 65 20 66 6f 72 20 | 65 64 69 74 69 6e 67 20 |ode for |editing |
|00000660| 6b 69 6c 6c 20 66 69 6c | 65 73 2e 0a 0a 49 66 20 |kill fil|es...If |
|00000670| 79 6f 75 20 61 72 65 20 | 75 73 69 6e 67 20 74 68 |you are |using th|
|00000680| 69 73 20 6d 6f 64 65 20 | 2d 20 79 6f 75 20 70 72 |is mode |- you pr|
|00000690| 6f 62 61 62 6c 79 20 73 | 68 6f 75 6c 64 6e 27 74 |obably s|houldn't|
|000006a0| 2e 20 20 4b 69 6c 6c 20 | 66 69 6c 65 73 0a 70 65 |. Kill |files.pe|
|000006b0| 72 66 6f 72 6d 20 62 61 | 64 6c 79 20 61 6e 64 20 |rform ba|dly and |
|000006c0| 70 61 69 6e 74 20 77 69 | 74 68 20 61 20 70 72 65 |paint wi|th a pre|
|000006d0| 74 74 79 20 62 72 6f 61 | 64 20 62 72 75 73 68 2e |tty broa|d brush.|
|000006e0| 20 20 53 63 6f 72 65 20 | 66 69 6c 65 73 2c 20 6f | Score |files, o|
|000006f0| 6e 0a 74 68 65 20 6f 74 | 68 65 72 20 68 61 6e 64 |n.the ot|her hand|
|00000700| 2c 20 61 72 65 20 76 61 | 73 74 6c 79 20 66 61 73 |, are va|stly fas|
|00000710| 74 65 72 20 28 34 30 78 | 20 73 70 65 65 64 75 70 |ter (40x| speedup|
|00000720| 29 20 61 6e 64 20 67 69 | 76 65 20 79 6f 75 20 6d |) and gi|ve you m|
|00000730| 6f 72 65 0a 63 6f 6e 74 | 72 6f 6c 20 6f 76 65 72 |ore.cont|rol over|
|00000740| 20 77 68 61 74 20 74 6f | 20 64 6f 2e 0a 0a 49 6e | what to| do...In|
|00000750| 20 61 64 64 69 74 69 6f | 6e 20 74 6f 20 45 6d 61 | additio|n to Ema|
|00000760| 63 73 2d 4c 69 73 70 20 | 4d 6f 64 65 2c 20 74 68 |cs-Lisp |Mode, th|
|00000770| 65 20 66 6f 6c 6c 6f 77 | 69 6e 67 20 63 6f 6d 6d |e follow|ing comm|
|00000780| 61 6e 64 73 20 61 72 65 | 20 61 76 61 69 6c 61 62 |ands are| availab|
|00000790| 6c 65 3a 0a 0a 5c 7b 67 | 6e 75 73 2d 6b 69 6c 6c |le:..\{g|nus-kill|
|000007a0| 2d 66 69 6c 65 2d 6d 6f | 64 65 2d 6d 61 70 7d 0a |-file-mo|de-map}.|
|000007b0| 0a 20 20 41 20 6b 69 6c | 6c 20 66 69 6c 65 20 63 |. A kil|l file c|
|000007c0| 6f 6e 74 61 69 6e 73 20 | 4c 69 73 70 20 65 78 70 |ontains |Lisp exp|
|000007d0| 72 65 73 73 69 6f 6e 73 | 20 74 6f 20 62 65 20 61 |ressions| to be a|
|000007e0| 70 70 6c 69 65 64 20 74 | 6f 20 61 20 73 65 6c 65 |pplied t|o a sele|
|000007f0| 63 74 65 64 0a 6e 65 77 | 73 67 72 6f 75 70 2e 20 |cted.new|sgroup. |
|00000800| 20 54 68 65 20 70 75 72 | 70 6f 73 65 20 69 73 20 | The pur|pose is |
|00000810| 74 6f 20 6d 61 72 6b 20 | 61 72 74 69 63 6c 65 73 |to mark |articles|
|00000820| 20 61 73 20 72 65 61 64 | 20 6f 6e 20 74 68 65 20 | as read| on the |
|00000830| 62 61 73 69 73 20 6f 66 | 0a 73 6f 6d 65 20 73 65 |basis of|.some se|
|00000840| 74 20 6f 66 20 72 65 67 | 65 78 70 73 2e 20 20 41 |t of reg|exps. A|
|00000850| 20 67 6c 6f 62 61 6c 20 | 6b 69 6c 6c 20 66 69 6c | global |kill fil|
|00000860| 65 20 69 73 20 61 70 70 | 6c 69 65 64 20 74 6f 20 |e is app|lied to |
|00000870| 65 76 65 72 79 20 6e 65 | 77 73 67 72 6f 75 70 2c |every ne|wsgroup,|
|00000880| 0a 61 6e 64 20 61 20 6c | 6f 63 61 6c 20 6b 69 6c |.and a l|ocal kil|
|00000890| 6c 20 66 69 6c 65 20 69 | 73 20 61 70 70 6c 69 65 |l file i|s applie|
|000008a0| 64 20 74 6f 20 61 20 73 | 70 65 63 69 66 69 65 64 |d to a s|pecified|
|000008b0| 20 6e 65 77 73 67 72 6f | 75 70 2e 20 20 53 69 6e | newsgro|up. Sin|
|000008c0| 63 65 20 61 0a 67 6c 6f | 62 61 6c 20 6b 69 6c 6c |ce a.glo|bal kill|
|000008d0| 20 66 69 6c 65 20 69 73 | 20 61 70 70 6c 69 65 64 | file is| applied|
|000008e0| 20 74 6f 20 65 76 65 72 | 79 20 6e 65 77 73 67 72 | to ever|y newsgr|
|000008f0| 6f 75 70 2c 20 66 6f 72 | 20 62 65 74 74 65 72 20 |oup, for| better |
|00000900| 70 65 72 66 6f 72 6d 61 | 6e 63 65 0a 75 73 65 20 |performa|nce.use |
|00000910| 61 20 6c 6f 63 61 6c 20 | 6f 6e 65 2e 0a 0a 20 20 |a local |one... |
|00000920| 41 20 6b 69 6c 6c 20 66 | 69 6c 65 20 63 61 6e 20 |A kill f|ile can |
|00000930| 63 6f 6e 74 61 69 6e 20 | 61 6e 79 20 6b 69 6e 64 |contain |any kind|
|00000940| 20 6f 66 20 45 6d 61 63 | 73 20 4c 69 73 70 20 65 | of Emac|s Lisp e|
|00000950| 78 70 72 65 73 73 69 6f | 6e 73 20 65 78 70 65 63 |xpressio|ns expec|
|00000960| 74 65 64 0a 74 6f 20 62 | 65 20 65 76 61 6c 75 61 |ted.to b|e evalua|
|00000970| 74 65 64 20 69 6e 20 74 | 68 65 20 53 75 6d 6d 61 |ted in t|he Summa|
|00000980| 72 79 20 62 75 66 66 65 | 72 2e 20 20 57 72 69 74 |ry buffe|r. Writ|
|00000990| 69 6e 67 20 4c 69 73 70 | 20 70 72 6f 67 72 61 6d |ing Lisp| program|
|000009a0| 73 20 66 6f 72 20 74 68 | 69 73 0a 70 75 72 70 6f |s for th|is.purpo|
|000009b0| 73 65 20 69 73 20 6e 6f | 74 20 73 6f 20 65 61 73 |se is no|t so eas|
|000009c0| 79 20 62 65 63 61 75 73 | 65 20 74 68 65 20 69 6e |y becaus|e the in|
|000009d0| 74 65 72 6e 61 6c 20 77 | 6f 72 6b 69 6e 67 20 6f |ternal w|orking o|
|000009e0| 66 20 47 6e 75 73 20 6d | 75 73 74 20 62 65 0a 77 |f Gnus m|ust be.w|
|000009f0| 65 6c 6c 2d 6b 6e 6f 77 | 6e 2e 20 20 46 6f 72 20 |ell-know|n. For |
|00000a00| 74 68 69 73 20 72 65 61 | 73 6f 6e 2c 20 47 6e 75 |this rea|son, Gnu|
|00000a10| 73 20 70 72 6f 76 69 64 | 65 73 20 61 20 67 65 6e |s provid|es a gen|
|00000a20| 65 72 61 6c 20 66 75 6e | 63 74 69 6f 6e 20 77 68 |eral fun|ction wh|
|00000a30| 69 63 68 0a 64 6f 65 73 | 20 74 68 69 73 20 65 61 |ich.does| this ea|
|00000a40| 73 69 6c 79 20 66 6f 72 | 20 6e 6f 6e 2d 4c 69 73 |sily for| non-Lis|
|00000a50| 70 20 70 72 6f 67 72 61 | 6d 6d 65 72 73 2e 0a 0a |p progra|mmers...|
|00000a60| 20 20 54 68 65 20 60 67 | 6e 75 73 2d 6b 69 6c 6c | The `g|nus-kill|
|00000a70| 27 20 66 75 6e 63 74 69 | 6f 6e 20 65 78 65 63 75 |' functi|on execu|
|00000a80| 74 65 73 20 63 6f 6d 6d | 61 6e 64 73 20 61 76 61 |tes comm|ands ava|
|00000a90| 69 6c 61 62 6c 65 20 69 | 6e 20 53 75 6d 6d 61 72 |ilable i|n Summar|
|00000aa0| 79 20 4d 6f 64 65 0a 62 | 79 20 74 68 65 69 72 20 |y Mode.b|y their |
|00000ab0| 6b 65 79 20 73 65 71 75 | 65 6e 63 65 73 2e 20 60 |key sequ|ences. `|
|00000ac0| 67 6e 75 73 2d 6b 69 6c | 6c 27 20 73 68 6f 75 6c |gnus-kil|l' shoul|
|00000ad0| 64 20 62 65 20 63 61 6c | 6c 65 64 20 77 69 74 68 |d be cal|led with|
|00000ae0| 20 46 49 45 4c 44 2c 0a | 52 45 47 45 58 50 20 61 | FIELD,.|REGEXP a|
|00000af0| 6e 64 20 6f 70 74 69 6f | 6e 61 6c 20 43 4f 4d 4d |nd optio|nal COMM|
|00000b00| 41 4e 44 20 61 6e 64 20 | 41 4c 4c 2e 20 20 46 49 |AND and |ALL. FI|
|00000b10| 45 4c 44 20 69 73 20 61 | 20 73 74 72 69 6e 67 20 |ELD is a| string |
|00000b20| 72 65 70 72 65 73 65 6e | 74 69 6e 67 0a 74 68 65 |represen|ting.the|
|00000b30| 20 68 65 61 64 65 72 20 | 66 69 65 6c 64 20 6f 72 | header |field or|
|00000b40| 20 61 6e 20 65 6d 70 74 | 79 20 73 74 72 69 6e 67 | an empt|y string|
|00000b50| 2e 20 20 49 66 20 46 49 | 45 4c 44 20 69 73 20 61 |. If FI|ELD is a|
|00000b60| 6e 20 65 6d 70 74 79 20 | 73 74 72 69 6e 67 2c 20 |n empty |string, |
|00000b70| 74 68 65 0a 65 6e 74 69 | 72 65 20 61 72 74 69 63 |the.enti|re artic|
|00000b80| 6c 65 20 62 6f 64 79 20 | 69 73 20 73 65 61 72 63 |le body |is searc|
|00000b90| 68 65 64 20 66 6f 72 2e | 20 20 52 45 47 45 58 50 |hed for.| REGEXP|
|00000ba0| 20 69 73 20 61 20 73 74 | 72 69 6e 67 20 77 68 69 | is a st|ring whi|
|00000bb0| 63 68 20 69 73 0a 63 6f | 6d 70 61 72 65 64 20 77 |ch is.co|mpared w|
|00000bc0| 69 74 68 20 46 49 45 4c | 44 20 76 61 6c 75 65 2e |ith FIEL|D value.|
|00000bd0| 20 43 4f 4d 4d 41 4e 44 | 20 69 73 20 61 20 73 74 | COMMAND| is a st|
|00000be0| 72 69 6e 67 20 72 65 70 | 72 65 73 65 6e 74 69 6e |ring rep|resentin|
|00000bf0| 67 20 61 20 76 61 6c 69 | 64 0a 6b 65 79 20 73 65 |g a vali|d.key se|
|00000c00| 71 75 65 6e 63 65 20 69 | 6e 20 53 75 6d 6d 61 72 |quence i|n Summar|
|00000c10| 79 20 6d 6f 64 65 20 6f | 72 20 4c 69 73 70 20 65 |y mode o|r Lisp e|
|00000c20| 78 70 72 65 73 73 69 6f | 6e 2e 20 43 4f 4d 4d 41 |xpressio|n. COMMA|
|00000c30| 4e 44 20 64 65 66 61 75 | 6c 74 73 20 74 6f 0a 27 |ND defau|lts to.'|
|00000c40| 28 67 6e 75 73 2d 73 75 | 6d 6d 61 72 79 2d 6d 61 |(gnus-su|mmary-ma|
|00000c50| 72 6b 2d 61 73 2d 72 65 | 61 64 20 6e 69 6c 20 22 |rk-as-re|ad nil "|
|00000c60| 58 22 29 2e 20 20 4d 61 | 6b 65 20 73 75 72 65 20 |X"). Ma|ke sure |
|00000c70| 74 68 61 74 20 43 4f 4d | 4d 41 4e 44 20 69 73 0a |that COM|MAND is.|
|00000c80| 65 78 65 63 75 74 65 64 | 20 69 6e 20 74 68 65 20 |executed| in the |
|00000c90| 53 75 6d 6d 61 72 79 20 | 62 75 66 66 65 72 2e 20 |Summary |buffer. |
|00000ca0| 20 49 66 20 74 68 65 20 | 73 65 63 6f 6e 64 20 6f | If the |second o|
|00000cb0| 70 74 69 6f 6e 61 6c 20 | 61 72 67 75 6d 65 6e 74 |ptional |argument|
|00000cc0| 20 41 4c 4c 0a 69 73 20 | 6e 6f 6e 2d 6e 69 6c 2c | ALL.is |non-nil,|
|00000cd0| 20 74 68 65 20 43 4f 4d | 4d 41 4e 44 20 69 73 20 | the COM|MAND is |
|00000ce0| 61 70 70 6c 69 65 64 20 | 74 6f 20 61 72 74 69 63 |applied |to artic|
|00000cf0| 6c 65 73 20 77 68 69 63 | 68 20 61 72 65 20 61 6c |les whic|h are al|
|00000d00| 72 65 61 64 79 0a 6d 61 | 72 6b 65 64 20 61 73 20 |ready.ma|rked as |
|00000d10| 72 65 61 64 20 6f 72 20 | 75 6e 72 65 61 64 2e 20 |read or |unread. |
|00000d20| 20 41 72 74 69 63 6c 65 | 73 20 77 68 69 63 68 20 | Article|s which |
|00000d30| 61 72 65 20 6d 61 72 6b | 65 64 20 61 72 65 20 73 |are mark|ed are s|
|00000d40| 6b 69 70 70 65 64 20 6f | 76 65 72 0a 62 79 20 64 |kipped o|ver.by d|
|00000d50| 65 66 61 75 6c 74 2e 0a | 0a 20 20 46 6f 72 20 65 |efault..|. For e|
|00000d60| 78 61 6d 70 6c 65 2c 20 | 69 66 20 79 6f 75 20 77 |xample, |if you w|
|00000d70| 61 6e 74 20 74 6f 20 6d | 61 72 6b 20 61 72 74 69 |ant to m|ark arti|
|00000d80| 63 6c 65 73 20 6f 66 20 | 77 68 69 63 68 20 73 75 |cles of |which su|
|00000d90| 62 6a 65 63 74 73 20 63 | 6f 6e 74 61 69 6e 0a 74 |bjects c|ontain.t|
|00000da0| 68 65 20 73 74 72 69 6e | 67 20 60 41 49 27 20 61 |he strin|g `AI' a|
|00000db0| 73 20 72 65 61 64 2c 20 | 61 20 70 6f 73 73 69 62 |s read, |a possib|
|00000dc0| 6c 65 20 6b 69 6c 6c 20 | 66 69 6c 65 20 6d 61 79 |le kill |file may|
|00000dd0| 20 6c 6f 6f 6b 20 6c 69 | 6b 65 3a 0a 0a 09 28 67 | look li|ke:...(g|
|00000de0| 6e 75 73 2d 6b 69 6c 6c | 20 22 53 75 62 6a 65 63 |nus-kill| "Subjec|
|00000df0| 74 22 20 22 41 49 22 29 | 0a 0a 20 20 49 66 20 79 |t" "AI")|.. If y|
|00000e00| 6f 75 20 77 61 6e 74 20 | 74 6f 20 6d 61 72 6b 20 |ou want |to mark |
|00000e10| 61 72 74 69 63 6c 65 73 | 20 77 69 74 68 20 60 44 |articles| with `D|
|00000e20| 27 20 69 6e 73 74 65 61 | 64 20 6f 66 20 60 58 27 |' instea|d of `X'|
|00000e30| 2c 20 79 6f 75 20 63 61 | 6e 20 75 73 65 0a 74 68 |, you ca|n use.th|
|00000e40| 65 20 66 6f 6c 6c 6f 77 | 69 6e 67 20 65 78 70 72 |e follow|ing expr|
|00000e50| 65 73 73 69 6f 6e 3a 0a | 0a 09 28 67 6e 75 73 2d |ession:.|..(gnus-|
|00000e60| 6b 69 6c 6c 20 22 53 75 | 62 6a 65 63 74 22 20 22 |kill "Su|bject" "|
|00000e70| 41 49 22 20 22 64 22 29 | 0a 0a 49 6e 20 74 68 69 |AI" "d")|..In thi|
|00000e80| 73 20 65 78 61 6d 70 6c | 65 20 69 74 20 69 73 20 |s exampl|e it is |
|00000e90| 61 73 73 75 6d 65 64 20 | 74 68 61 74 20 74 68 65 |assumed |that the|
|00000ea0| 20 63 6f 6d 6d 61 6e 64 | 0a 60 67 6e 75 73 2d 73 | command|.`gnus-s|
|00000eb0| 75 6d 6d 61 72 79 2d 6d | 61 72 6b 2d 61 73 2d 72 |ummary-m|ark-as-r|
|00000ec0| 65 61 64 2d 66 6f 72 77 | 61 72 64 27 20 69 73 20 |ead-forw|ard' is |
|00000ed0| 61 73 73 69 67 6e 65 64 | 20 74 6f 20 60 64 27 20 |assigned| to `d' |
|00000ee0| 69 6e 20 53 75 6d 6d 61 | 72 79 20 4d 6f 64 65 2e |in Summa|ry Mode.|
|00000ef0| 0a 0a 20 20 49 74 20 69 | 73 20 70 6f 73 73 69 62 |.. It i|s possib|
|00000f00| 6c 65 20 74 6f 20 64 65 | 6c 65 74 65 20 75 6e 6e |le to de|lete unn|
|00000f10| 65 63 65 73 73 61 72 79 | 20 68 65 61 64 65 72 73 |ecessary| headers|
|00000f20| 20 77 68 69 63 68 20 61 | 72 65 20 6d 61 72 6b 65 | which a|re marke|
|00000f30| 64 20 77 69 74 68 0a 60 | 58 27 20 69 6e 20 61 20 |d with.`|X' in a |
|00000f40| 6b 69 6c 6c 20 66 69 6c | 65 20 61 73 20 66 6f 6c |kill fil|e as fol|
|00000f50| 6c 6f 77 73 3a 0a 0a 09 | 28 67 6e 75 73 2d 65 78 |lows:...|(gnus-ex|
|00000f60| 70 75 6e 67 65 20 22 58 | 22 29 0a 0a 20 20 49 66 |punge "X|").. If|
|00000f70| 20 74 68 65 20 53 75 6d | 6d 61 72 79 20 62 75 66 | the Sum|mary buf|
|00000f80| 66 65 72 20 69 73 20 65 | 6d 70 74 79 20 61 66 74 |fer is e|mpty aft|
|00000f90| 65 72 20 61 70 70 6c 79 | 69 6e 67 20 6b 69 6c 6c |er apply|ing kill|
|00000fa0| 20 66 69 6c 65 73 2c 20 | 47 6e 75 73 20 77 69 6c | files, |Gnus wil|
|00000fb0| 6c 0a 65 78 69 74 20 74 | 68 65 20 73 65 6c 65 63 |l.exit t|he selec|
|00000fc0| 74 65 64 20 6e 65 77 73 | 67 72 6f 75 70 20 6e 6f |ted news|group no|
|00000fd0| 72 6d 61 6c 6c 79 2e 20 | 20 49 66 20 68 65 61 64 |rmally. | If head|
|00000fe0| 65 72 73 20 77 68 69 63 | 68 20 61 72 65 20 6d 61 |ers whic|h are ma|
|00000ff0| 72 6b 65 64 0a 77 69 74 | 68 20 60 44 27 20 61 72 |rked.wit|h `D' ar|
|00001000| 65 20 64 65 6c 65 74 65 | 64 20 69 6e 20 61 20 6b |e delete|d in a k|
|00001010| 69 6c 6c 20 66 69 6c 65 | 2c 20 69 74 20 69 73 20 |ill file|, it is |
|00001020| 69 6d 70 6f 73 73 69 62 | 6c 65 20 74 6f 20 72 65 |impossib|le to re|
|00001030| 61 64 20 61 72 74 69 63 | 6c 65 73 0a 77 68 69 63 |ad artic|les.whic|
|00001040| 68 20 61 72 65 20 6d 61 | 72 6b 65 64 20 61 73 20 |h are ma|rked as |
|00001050| 72 65 61 64 20 69 6e 20 | 74 68 65 20 70 72 65 76 |read in |the prev|
|00001060| 69 6f 75 73 20 47 6e 75 | 73 20 73 65 73 73 69 6f |ious Gnu|s sessio|
|00001070| 6e 73 2e 20 20 4d 61 72 | 6b 73 20 6f 74 68 65 72 |ns. Mar|ks other|
|00001080| 0a 74 68 61 6e 20 60 44 | 27 20 73 68 6f 75 6c 64 |.than `D|' should|
|00001090| 20 62 65 20 75 73 65 64 | 20 66 6f 72 20 61 72 74 | be used| for art|
|000010a0| 69 63 6c 65 73 20 77 68 | 69 63 68 20 73 68 6f 75 |icles wh|ich shou|
|000010b0| 6c 64 20 72 65 61 6c 6c | 79 20 62 65 20 64 65 6c |ld reall|y be del|
|000010c0| 65 74 65 64 2e 0a 0a 45 | 6e 74 72 79 20 74 6f 20 |eted...E|ntry to |
|000010d0| 74 68 69 73 20 6d 6f 64 | 65 20 63 61 6c 6c 73 20 |this mod|e calls |
|000010e0| 65 6d 61 63 73 2d 6c 69 | 73 70 2d 6d 6f 64 65 2d |emacs-li|sp-mode-|
|000010f0| 68 6f 6f 6b 20 61 6e 64 | 0a 67 6e 75 73 2d 6b 69 |hook and|.gnus-ki|
|00001100| 6c 6c 2d 66 69 6c 65 2d | 6d 6f 64 65 2d 68 6f 6f |ll-file-|mode-hoo|
|00001110| 6b 20 77 69 74 68 20 6e | 6f 20 61 72 67 75 6d 65 |k with n|o argume|
|00001120| 6e 74 73 2c 20 69 66 20 | 74 68 61 74 20 76 61 6c |nts, if |that val|
|00001130| 75 65 20 69 73 20 6e 6f | 6e 2d 6e 69 6c 2e 1f 0a |ue is no|n-nil...|
|00001140| 28 64 65 66 61 6c 69 61 | 73 20 27 67 6e 75 73 2d |(defalia|s 'gnus-|
|00001150| 6b 69 6c 6c 2d 66 69 6c | 65 2d 6d 6f 64 65 20 23 |kill-fil|e-mode #|
|00001160| 5b 6e 69 6c 20 22 c0 20 | 88 c1 5c 6e 21 88 c3 5c |[nil ". |..\n!..\|
|00001170| 66 21 88 c5 16 06 c7 16 | 08 c9 ca 21 88 cb cc cd |f!......|...!....|
|00001180| 5c 22 87 22 20 5b 6b 69 | 6c 6c 2d 61 6c 6c 2d 6c |\"." [ki|ll-all-l|
|00001190| 6f 63 61 6c 2d 76 61 72 | 69 61 62 6c 65 73 20 75 |ocal-var|iables u|
|000011a0| 73 65 2d 6c 6f 63 61 6c | 2d 6d 61 70 20 67 6e 75 |se-local|-map gnu|
|000011b0| 73 2d 6b 69 6c 6c 2d 66 | 69 6c 65 2d 6d 6f 64 65 |s-kill-f|ile-mode|
|000011c0| 2d 6d 61 70 20 73 65 74 | 2d 73 79 6e 74 61 78 2d |-map set|-syntax-|
|000011d0| 74 61 62 6c 65 20 65 6d | 61 63 73 2d 6c 69 73 70 |table em|acs-lisp|
|000011e0| 2d 6d 6f 64 65 2d 73 79 | 6e 74 61 78 2d 74 61 62 |-mode-sy|ntax-tab|
|000011f0| 6c 65 20 67 6e 75 73 2d | 6b 69 6c 6c 2d 66 69 6c |le gnus-|kill-fil|
|00001200| 65 2d 6d 6f 64 65 20 6d | 61 6a 6f 72 2d 6d 6f 64 |e-mode m|ajor-mod|
|00001210| 65 20 22 4b 69 6c 6c 22 | 20 6d 6f 64 65 2d 6e 61 |e "Kill"| mode-na|
|00001220| 6d 65 20 6c 69 73 70 2d | 6d 6f 64 65 2d 76 61 72 |me lisp-|mode-var|
|00001230| 69 61 62 6c 65 73 20 6e | 69 6c 20 72 75 6e 2d 68 |iables n|il run-h|
|00001240| 6f 6f 6b 73 20 65 6d 61 | 63 73 2d 6c 69 73 70 2d |ooks ema|cs-lisp-|
|00001250| 6d 6f 64 65 2d 68 6f 6f | 6b 20 67 6e 75 73 2d 6b |mode-hoo|k gnus-k|
|00001260| 69 6c 6c 2d 66 69 6c 65 | 2d 6d 6f 64 65 2d 68 6f |ill-file|-mode-ho|
|00001270| 6f 6b 5d 20 33 20 28 23 | 24 20 2e 20 31 36 30 39 |ok] 3 (#|$ . 1609|
|00001280| 29 20 6e 69 6c 5d 29 0a | 23 40 39 37 20 42 65 67 |) nil]).|#@97 Beg|
|00001290| 69 6e 20 65 64 69 74 69 | 6e 67 20 61 20 6b 69 6c |in editi|ng a kil|
|000012a0| 6c 20 66 69 6c 65 20 66 | 6f 72 20 4e 45 57 53 47 |l file f|or NEWSG|
|000012b0| 52 4f 55 50 2e 0a 49 66 | 20 4e 45 57 53 47 52 4f |ROUP..If| NEWSGRO|
|000012c0| 55 50 20 69 73 20 6e 69 | 6c 2c 20 74 68 65 20 67 |UP is ni|l, the g|
|000012d0| 6c 6f 62 61 6c 20 6b 69 | 6c 6c 20 66 69 6c 65 20 |lobal ki|ll file |
|000012e0| 69 73 20 73 65 6c 65 63 | 74 65 64 2e 1f 0a 28 64 |is selec|ted...(d|
|000012f0| 65 66 61 6c 69 61 73 20 | 27 67 6e 75 73 2d 6b 69 |efalias |'gnus-ki|
|00001300| 6c 6c 2d 66 69 6c 65 2d | 65 64 69 74 2d 66 69 6c |ll-file-|edit-fil|
|00001310| 65 20 23 5b 28 6e 65 77 | 73 67 72 6f 75 70 29 20 |e #[(new|sgroup) |
|00001320| 22 c0 09 21 1a c3 c4 5c | 6e 21 21 88 c5 5c 6e 21 |"..!...\|n!!..\n!|
|00001330| 83 18 00 c6 c5 5c 6e 21 | 21 84 1c 00 c7 20 16 08 |.....\n!|!.... ..|
|00001340| c9 5c 6e 21 1e 5c 6e c6 | 0e 5c 6e 21 83 30 00 cb |.\n!.\n.|.\n!.0..|
|00001350| 0e 5c 6e 21 88 82 64 00 | 0e 5c 66 cd 3d 83 43 00 |.\n!..d.|.\f.=.C.|
|00001360| ce cf 21 88 cb 0e 5c 6e | 21 88 82 64 00 0e 5c 66 |..!...\n|!..d..\f|
|00001370| d0 3d 83 60 00 ce d1 21 | 88 cb 0e 12 21 88 d3 0e |.=.`...!|....!...|
|00001380| 12 21 88 d4 0e 5c 6e 21 | 88 82 64 00 d5 5c 6e 21 |.!...\n!|..d..\n!|
|00001390| 88 29 d6 20 29 87 22 20 | 5b 67 6e 75 73 2d 6e 65 |.). )." |[gnus-ne|
|000013a0| 77 73 67 72 6f 75 70 2d | 6b 69 6c 6c 2d 66 69 6c |wsgroup-|kill-fil|
|000013b0| 65 20 6e 65 77 73 67 72 | 6f 75 70 20 66 69 6c 65 |e newsgr|oup file|
|000013c0| 20 67 6e 75 73 2d 6d 61 | 6b 65 2d 64 69 72 65 63 | gnus-ma|ke-direc|
|000013d0| 74 6f 72 79 20 66 69 6c | 65 2d 6e 61 6d 65 2d 64 |tory fil|e-name-d|
|000013e0| 69 72 65 63 74 6f 72 79 | 20 67 65 74 2d 66 69 6c |irectory| get-fil|
|000013f0| 65 2d 62 75 66 66 65 72 | 20 67 65 74 2d 62 75 66 |e-buffer| get-buf|
|00001400| 66 65 72 2d 77 69 6e 64 | 6f 77 20 63 75 72 72 65 |fer-wind|ow curre|
|00001410| 6e 74 2d 77 69 6e 64 6f | 77 2d 63 6f 6e 66 69 67 |nt-windo|w-config|
|00001420| 75 72 61 74 69 6f 6e 20 | 67 6e 75 73 2d 77 69 6e |uration |gnus-win|
|00001430| 63 6f 6e 66 2d 6b 69 6c | 6c 2d 66 69 6c 65 20 66 |conf-kil|l-file f|
|00001440| 69 6e 64 2d 66 69 6c 65 | 2d 6e 6f 73 65 6c 65 63 |ind-file|-noselec|
|00001450| 74 20 62 75 66 66 65 72 | 20 70 6f 70 2d 74 6f 2d |t buffer| pop-to-|
|00001460| 62 75 66 66 65 72 20 6d | 61 6a 6f 72 2d 6d 6f 64 |buffer m|ajor-mod|
|00001470| 65 20 67 6e 75 73 2d 67 | 72 6f 75 70 2d 6d 6f 64 |e gnus-g|roup-mod|
|00001480| 65 20 67 6e 75 73 2d 63 | 6f 6e 66 69 67 75 72 65 |e gnus-c|onfigure|
|00001490| 2d 77 69 6e 64 6f 77 73 | 20 67 72 6f 75 70 20 67 |-windows| group g|
|000014a0| 6e 75 73 2d 73 75 6d 6d | 61 72 79 2d 6d 6f 64 65 |nus-summ|ary-mode|
|000014b0| 20 61 72 74 69 63 6c 65 | 20 67 6e 75 73 2d 61 72 | article| gnus-ar|
|000014c0| 74 69 63 6c 65 2d 62 75 | 66 66 65 72 20 62 75 72 |ticle-bu|ffer bur|
|000014d0| 79 2d 62 75 66 66 65 72 | 20 73 77 69 74 63 68 2d |y-buffer| switch-|
|000014e0| 74 6f 2d 62 75 66 66 65 | 72 20 66 69 6e 64 2d 66 |to-buffe|r find-f|
|000014f0| 69 6c 65 2d 6f 74 68 65 | 72 2d 77 69 6e 64 6f 77 |ile-othe|r-window|
|00001500| 20 67 6e 75 73 2d 6b 69 | 6c 6c 2d 66 69 6c 65 2d | gnus-ki|ll-file-|
|00001510| 6d 6f 64 65 5d 20 33 20 | 28 23 24 20 2e 20 34 37 |mode] 3 |(#$ . 47|
|00001520| 34 39 29 20 22 73 4e 65 | 77 73 67 72 6f 75 70 3a |49) "sNe|wsgroup:|
|00001530| 20 22 5d 29 0a 28 64 65 | 66 61 6c 69 61 73 20 27 | "]).(de|falias '|
|00001540| 67 6e 75 73 2d 6b 69 6c | 6c 2d 73 65 74 2d 6b 69 |gnus-kil|l-set-ki|
|00001550| 6c 6c 2d 62 75 66 66 65 | 72 20 23 5b 6e 69 6c 20 |ll-buffe|r #[nil |
|00001560| 22 c0 09 21 1a c3 5c 6e | 21 89 1c 71 88 c5 20 88 |"..!..\n|!..q.. .|
|00001570| c6 5c 66 21 2a 87 22 20 | 5b 67 6e 75 73 2d 6e 65 |.\f!*." |[gnus-ne|
|00001580| 77 73 67 72 6f 75 70 2d | 6b 69 6c 6c 2d 66 69 6c |wsgroup-|kill-fil|
|00001590| 65 20 67 6e 75 73 2d 6e | 65 77 73 67 72 6f 75 70 |e gnus-n|ewsgroup|
|000015a0| 2d 6e 61 6d 65 20 66 69 | 6c 65 20 66 69 6e 64 2d |-name fi|le find-|
|000015b0| 66 69 6c 65 2d 6e 6f 73 | 65 6c 65 63 74 20 62 75 |file-nos|elect bu|
|000015c0| 66 66 65 72 20 67 6e 75 | 73 2d 6b 69 6c 6c 2d 66 |ffer gnu|s-kill-f|
|000015d0| 69 6c 65 2d 6d 6f 64 65 | 20 62 75 72 79 2d 62 75 |ile-mode| bury-bu|
|000015e0| 66 66 65 72 5d 20 33 5d | 29 0a 28 64 65 66 61 6c |ffer] 3]|).(defal|
|000015f0| 69 61 73 20 27 67 6e 75 | 73 2d 6b 69 6c 6c 2d 66 |ias 'gnu|s-kill-f|
|00001600| 69 6c 65 2d 65 6e 74 65 | 72 2d 6b 69 6c 6c 20 23 |ile-ente|r-kill #|
|00001610| 5b 28 66 69 65 6c 64 20 | 72 65 67 65 78 70 20 26 |[(field |regexp &|
|00001620| 6f 70 74 69 6f 6e 61 6c | 20 64 6f 6e 74 2d 6d 6f |optional| dont-mo|
|00001630| 76 65 29 20 22 8a c0 19 | 5c 6e c3 3d 84 5c 66 00 |ve) "...|\n.=.\f.|
|00001640| c4 20 88 0d 84 13 00 64 | 62 88 c6 c7 0e 08 0e 09 |. .....d|b.......|
|00001650| 23 89 11 63 88 ca 09 21 | 2a 87 22 20 5b 6e 69 6c |#..c...!|*." [nil|
|00001660| 20 73 74 72 69 6e 67 20 | 6d 61 6a 6f 72 2d 6d 6f | string |major-mo|
|00001670| 64 65 20 67 6e 75 73 2d | 6b 69 6c 6c 2d 66 69 6c |de gnus-|kill-fil|
|00001680| 65 2d 6d 6f 64 65 20 67 | 6e 75 73 2d 6b 69 6c 6c |e-mode g|nus-kill|
|00001690| 2d 73 65 74 2d 6b 69 6c | 6c 2d 62 75 66 66 65 72 |-set-kil|l-buffer|
|000016a0| 20 64 6f 6e 74 2d 6d 6f | 76 65 20 66 6f 72 6d 61 | dont-mo|ve forma|
|000016b0| 74 20 22 28 67 6e 75 73 | 2d 6b 69 6c 6c 20 25 53 |t "(gnus|-kill %S|
|000016c0| 20 25 53 29 5c 6e 22 20 | 66 69 65 6c 64 20 72 65 | %S)\n" |field re|
|000016d0| 67 65 78 70 20 67 6e 75 | 73 2d 6b 69 6c 6c 2d 66 |gexp gnu|s-kill-f|
|000016e0| 69 6c 65 2d 61 70 70 6c | 79 2d 73 74 72 69 6e 67 |ile-appl|y-string|
|000016f0| 5d 20 34 5d 29 0a 23 40 | 31 38 20 4b 69 6c 6c 20 |] 4]).#@|18 Kill |
|00001700| 62 79 20 73 75 62 6a 65 | 63 74 2e 1f 0a 28 64 65 |by subje|ct...(de|
|00001710| 66 61 6c 69 61 73 20 27 | 67 6e 75 73 2d 6b 69 6c |falias '|gnus-kil|
|00001720| 6c 2d 66 69 6c 65 2d 6b | 69 6c 6c 2d 62 79 2d 73 |l-file-k|ill-by-s|
|00001730| 75 62 6a 65 63 74 20 23 | 5b 6e 69 6c 20 22 c0 c1 |ubject #|[nil "..|
|00001740| c2 0b 21 83 12 00 c4 c5 | 0b c6 48 21 21 82 13 00 |..!.....|..H!!...|
|00001750| c7 c8 23 87 22 20 5b 67 | 6e 75 73 2d 6b 69 6c 6c |..#." [g|nus-kill|
|00001760| 2d 66 69 6c 65 2d 65 6e | 74 65 72 2d 6b 69 6c 6c |-file-en|ter-kill|
|00001770| 20 22 53 75 62 6a 65 63 | 74 22 20 76 65 63 74 6f | "Subjec|t" vecto|
|00001780| 72 70 20 67 6e 75 73 2d | 63 75 72 72 65 6e 74 2d |rp gnus-|current-|
|00001790| 68 65 61 64 65 72 73 20 | 72 65 67 65 78 70 2d 71 |headers |regexp-q|
|000017a0| 75 6f 74 65 20 67 6e 75 | 73 2d 73 69 6d 70 6c 69 |uote gnu|s-simpli|
|000017b0| 66 79 2d 73 75 62 6a 65 | 63 74 20 31 20 22 22 20 |fy-subje|ct 1 "" |
|000017c0| 74 5d 20 36 20 28 23 24 | 20 2e 20 35 38 38 33 29 |t] 6 (#$| . 5883)|
|000017d0| 20 6e 69 6c 5d 29 0a 23 | 40 31 37 20 4b 69 6c 6c | nil]).#|@17 Kill|
|000017e0| 20 62 79 20 61 75 74 68 | 6f 72 2e 1f 0a 28 64 65 | by auth|or...(de|
|000017f0| 66 61 6c 69 61 73 20 27 | 67 6e 75 73 2d 6b 69 6c |falias '|gnus-kil|
|00001800| 6c 2d 66 69 6c 65 2d 6b | 69 6c 6c 2d 62 79 2d 61 |l-file-k|ill-by-a|
|00001810| 75 74 68 6f 72 20 23 5b | 6e 69 6c 20 22 c0 c1 c2 |uthor #[|nil "...|
|00001820| 0b 21 83 10 00 c4 0b c5 | 48 21 82 11 00 c6 c7 23 |.!......|H!.....#|
|00001830| 87 22 20 5b 67 6e 75 73 | 2d 6b 69 6c 6c 2d 66 69 |." [gnus|-kill-fi|
|00001840| 6c 65 2d 65 6e 74 65 72 | 2d 6b 69 6c 6c 20 22 46 |le-enter|-kill "F|
|00001850| 72 6f 6d 22 20 76 65 63 | 74 6f 72 70 20 67 6e 75 |rom" vec|torp gnu|
|00001860| 73 2d 63 75 72 72 65 6e | 74 2d 68 65 61 64 65 72 |s-curren|t-header|
|00001870| 73 20 72 65 67 65 78 70 | 2d 71 75 6f 74 65 20 32 |s regexp|-quote 2|
|00001880| 20 22 22 20 74 5d 20 35 | 20 28 23 24 20 2e 20 36 | "" t] 5| (#$ . 6|
|00001890| 31 30 38 29 20 6e 69 6c | 5d 29 0a 23 40 31 37 20 |108) nil|]).#@17 |
|000018a0| 4b 69 6c 6c 20 62 79 20 | 61 75 74 68 6f 72 2e 1f |Kill by |author..|
|000018b0| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 67 6e 75 73 |.(defali|as 'gnus|
|000018c0| 2d 6b 69 6c 6c 2d 66 69 | 6c 65 2d 6b 69 6c 6c 2d |-kill-fi|le-kill-|
|000018d0| 62 79 2d 74 68 72 65 61 | 64 20 23 5b 6e 69 6c 20 |by-threa|d #[nil |
|000018e0| 22 c0 c1 c2 0b 21 83 10 | 00 c4 0b c5 48 21 82 11 |"....!..|....H!..|
|000018f0| 00 c6 5c 22 87 22 20 5b | 67 6e 75 73 2d 6b 69 6c |..\"." [|gnus-kil|
|00001900| 6c 2d 66 69 6c 65 2d 65 | 6e 74 65 72 2d 6b 69 6c |l-file-e|nter-kil|
|00001910| 6c 20 22 52 65 66 65 72 | 65 6e 63 65 73 22 20 76 |l "Refer|ences" v|
|00001920| 65 63 74 6f 72 70 20 67 | 6e 75 73 2d 63 75 72 72 |ectorp g|nus-curr|
|00001930| 65 6e 74 2d 68 65 61 64 | 65 72 73 20 72 65 67 65 |ent-head|ers rege|
|00001940| 78 70 2d 71 75 6f 74 65 | 20 34 20 22 22 5d 20 35 |xp-quote| 4 ""] 5|
|00001950| 20 28 23 24 20 2e 20 36 | 33 30 34 29 20 6e 69 6c | (#$ . 6|304) nil|
|00001960| 5d 29 0a 23 40 31 35 20 | 4b 69 6c 6c 20 62 79 20 |]).#@15 |Kill by |
|00001970| 58 72 65 66 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |Xref...(|defalias|
|00001980| 20 27 67 6e 75 73 2d 6b | 69 6c 6c 2d 66 69 6c 65 | 'gnus-k|ill-file|
|00001990| 2d 6b 69 6c 6c 2d 62 79 | 2d 78 72 65 66 20 23 5b |-kill-by|-xref #[|
|000019a0| 6e 69 6c 20 22 c0 09 21 | 85 09 00 09 c2 48 c3 c4 |nil "..!|.....H..|
|000019b0| 1d 1e 06 89 1e 07 83 3f | 00 c8 c9 0e 07 0e 06 23 |.......?|.......#|
|000019c0| 85 44 00 c3 95 16 06 0e | 07 ca 94 ca 95 4f 89 15 |.D......|.....O..|
|000019d0| 0e 0b 98 84 14 00 cc cd | ce cf 0d 21 d0 51 d1 23 |........|...!.Q.#|
|000019e0| 88 82 14 00 cc cd d2 d1 | 23 2b 87 22 20 5b 76 65 |........|#+." [ve|
|000019f0| 63 74 6f 72 70 20 67 6e | 75 73 2d 63 75 72 72 65 |ctorp gn|us-curre|
|00001a00| 6e 74 2d 68 65 61 64 65 | 72 73 20 38 20 30 20 6e |nt-heade|rs 8 0 n|
|00001a10| 69 6c 20 67 72 6f 75 70 | 20 73 74 61 72 74 20 78 |il group| start x|
|00001a20| 72 65 66 20 73 74 72 69 | 6e 67 2d 6d 61 74 63 68 |ref stri|ng-match|
|00001a30| 20 22 20 5c 5c 28 5b 5e | 20 09 5d 2b 5c 5c 29 3a | " \\([^| .]+\\):|
|00001a40| 22 20 31 20 67 6e 75 73 | 2d 6e 65 77 73 67 72 6f |" 1 gnus|-newsgro|
|00001a50| 75 70 2d 6e 61 6d 65 20 | 67 6e 75 73 2d 6b 69 6c |up-name |gnus-kil|
|00001a60| 6c 2d 66 69 6c 65 2d 65 | 6e 74 65 72 2d 6b 69 6c |l-file-e|nter-kil|
|00001a70| 6c 20 22 58 72 65 66 22 | 20 22 20 22 20 72 65 67 |l "Xref"| " " reg|
|00001a80| 65 78 70 2d 71 75 6f 74 | 65 20 22 3a 22 20 74 20 |exp-quot|e ":" t |
|00001a90| 22 22 5d 20 36 20 28 23 | 24 20 2e 20 36 35 30 34 |""] 6 (#|$ . 6504|
|00001aa0| 29 20 6e 69 6c 5d 29 0a | 23 40 35 34 20 52 61 69 |) nil]).|#@54 Rai|
|00001ab0| 73 65 20 73 63 6f 72 65 | 20 66 6f 72 20 61 6c 6c |se score| for all|
|00001ac0| 20 66 6f 6c 6c 6f 77 75 | 70 73 20 74 6f 20 74 68 | followu|ps to th|
|00001ad0| 65 20 63 75 72 72 65 6e | 74 20 61 75 74 68 6f 72 |e curren|t author|
|00001ae0| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 67 6e |...(defa|lias 'gn|
|00001af0| 75 73 2d 6b 69 6c 6c 2d | 66 69 6c 65 2d 72 61 69 |us-kill-|file-rai|
|00001b00| 73 65 2d 66 6f 6c 6c 6f | 77 75 70 73 2d 74 6f 2d |se-follo|wups-to-|
|00001b10| 61 75 74 68 6f 72 20 23 | 5b 28 6c 65 76 65 6c 29 |author #|[(level)|
|00001b20| 20 22 08 c1 48 c2 1b 1c | 8a c5 20 88 65 62 88 c6 | "..H...|.. .eb..|
|00001b30| c7 0e 08 c9 51 ca 5c 66 | 21 5c 22 14 cb cc cd 5c |....Q.\f|!\"....\|
|00001b40| 66 0e 08 24 89 13 63 88 | ce 0b 21 88 29 cf d0 d1 |f..$..c.|..!.)...|
|00001b50| 5c 66 23 2a 87 22 20 5b | 67 6e 75 73 2d 63 75 72 |\f#*." [|gnus-cur|
|00001b60| 72 65 6e 74 2d 68 65 61 | 64 65 72 73 20 32 20 6e |rent-hea|ders 2 n|
|00001b70| 69 6c 20 73 74 72 69 6e | 67 20 6e 61 6d 65 20 67 |il strin|g name g|
|00001b80| 6e 75 73 2d 6b 69 6c 6c | 2d 73 65 74 2d 6b 69 6c |nus-kill|-set-kil|
|00001b90| 6c 2d 62 75 66 66 65 72 | 20 72 65 61 64 2d 73 74 |l-buffer| read-st|
|00001ba0| 72 69 6e 67 20 22 41 64 | 64 20 22 20 6c 65 76 65 |ring "Ad|d " leve|
|00001bb0| 6c 20 22 20 74 6f 20 66 | 6f 6c 6c 6f 77 75 70 20 |l " to f|ollowup |
|00001bc0| 61 72 74 69 63 6c 65 73 | 20 74 6f 3a 20 22 20 72 |articles| to: " r|
|00001bd0| 65 67 65 78 70 2d 71 75 | 6f 74 65 20 66 6f 72 6d |egexp-qu|ote form|
|00001be0| 61 74 20 22 28 67 6e 75 | 73 2d 6b 69 6c 6c 20 25 |at "(gnu|s-kill %|
|00001bf0| 53 20 25 53 20 27 28 67 | 6e 75 73 2d 73 75 6d 6d |S %S '(g|nus-summ|
|00001c00| 61 72 79 2d 74 65 6d 70 | 6f 72 61 72 69 6c 79 2d |ary-temp|orarily-|
|00001c10| 72 61 69 73 65 2d 62 79 | 2d 74 68 72 65 61 64 20 |raise-by|-thread |
|00001c20| 25 53 29 29 5c 6e 22 20 | 22 46 72 6f 6d 22 20 67 |%S))\n" |"From" g|
|00001c30| 6e 75 73 2d 6b 69 6c 6c | 2d 66 69 6c 65 2d 61 70 |nus-kill|-file-ap|
|00001c40| 70 6c 79 2d 73 74 72 69 | 6e 67 20 67 6e 75 73 2d |ply-stri|ng gnus-|
|00001c50| 6d 65 73 73 61 67 65 20 | 36 20 22 41 64 64 65 64 |message |6 "Added|
|00001c60| 20 74 65 6d 70 6f 72 61 | 72 79 20 73 63 6f 72 65 | tempora|ry score|
|00001c70| 20 66 69 6c 65 20 65 6e | 74 72 79 20 66 6f 72 20 | file en|try for |
|00001c80| 66 6f 6c 6c 6f 77 75 70 | 73 20 74 6f 20 25 73 2e |followup|s to %s.|
|00001c90| 22 5d 20 36 20 28 23 24 | 20 2e 20 36 38 32 39 29 |"] 6 (#$| . 6829)|
|00001ca0| 20 22 70 22 5d 29 0a 23 | 40 34 34 20 41 70 70 6c | "p"]).#|@44 Appl|
|00001cb0| 79 20 63 75 72 72 65 6e | 74 20 62 75 66 66 65 72 |y curren|t buffer|
|00001cc0| 20 74 6f 20 63 75 72 72 | 65 6e 74 20 6e 65 77 73 | to curr|ent news|
|00001cd0| 67 72 6f 75 70 2e 1f 0a | 28 64 65 66 61 6c 69 61 |group...|(defalia|
|00001ce0| 73 20 27 67 6e 75 73 2d | 6b 69 6c 6c 2d 66 69 6c |s 'gnus-|kill-fil|
|00001cf0| 65 2d 61 70 70 6c 79 2d | 62 75 66 66 65 72 20 23 |e-apply-|buffer #|
|00001d00| 5b 6e 69 6c 20 22 08 83 | 0f 00 c1 5c 6e 21 83 0f |[nil "..|...\n!..|
|00001d10| 00 c3 c4 20 21 87 c5 20 | 88 c6 c7 c8 5c 22 87 22 |... !.. |....\"."|
|00001d20| 20 5b 67 6e 75 73 2d 63 | 75 72 72 65 6e 74 2d 6b | [gnus-c|urrent-k|
|00001d30| 69 6c 6c 2d 61 72 74 69 | 63 6c 65 20 67 65 74 2d |ill-arti|cle get-|
|00001d40| 62 75 66 66 65 72 20 67 | 6e 75 73 2d 73 75 6d 6d |buffer g|nus-summ|
|00001d50| 61 72 79 2d 62 75 66 66 | 65 72 20 67 6e 75 73 2d |ary-buff|er gnus-|
|00001d60| 6b 69 6c 6c 2d 66 69 6c | 65 2d 61 70 70 6c 79 2d |kill-fil|e-apply-|
|00001d70| 73 74 72 69 6e 67 20 62 | 75 66 66 65 72 2d 73 74 |string b|uffer-st|
|00001d80| 72 69 6e 67 20 64 69 6e | 67 20 67 6e 75 73 2d 6d |ring din|g gnus-m|
|00001d90| 65 73 73 61 67 65 20 32 | 20 22 4e 6f 20 6e 65 77 |essage 2| "No new|
|00001da0| 73 67 72 6f 75 70 20 69 | 73 20 73 65 6c 65 63 74 |sgroup i|s select|
|00001db0| 65 64 2e 22 5d 20 33 20 | 28 23 24 20 2e 20 37 33 |ed."] 3 |(#$ . 73|
|00001dc0| 34 30 29 20 6e 69 6c 5d | 29 0a 23 40 33 36 20 41 |40) nil]|).#@36 A|
|00001dd0| 70 70 6c 79 20 53 54 52 | 49 4e 47 20 74 6f 20 63 |pply STR|ING to c|
|00001de0| 75 72 72 65 6e 74 20 6e | 65 77 73 67 72 6f 75 70 |urrent n|ewsgroup|
|00001df0| 2e 1f 0a 28 64 65 66 61 | 6c 69 61 73 20 27 67 6e |...(defa|lias 'gn|
|00001e00| 75 73 2d 6b 69 6c 6c 2d | 66 69 6c 65 2d 61 70 70 |us-kill-|file-app|
|00001e10| 6c 79 2d 73 74 72 69 6e | 67 20 23 5b 28 73 74 72 |ly-strin|g #[(str|
|00001e20| 69 6e 67 29 20 22 c0 09 | c2 51 19 8a c3 8b 2a 87 |ing) "..|.Q....*.|
|00001e30| 22 20 5b 22 28 70 72 6f | 67 6e 20 5c 6e 22 20 73 |" ["(pro|gn \n" s|
|00001e40| 74 72 69 6e 67 20 22 5c | 6e 29 22 20 28 28 62 79 |tring "\|n)" ((by|
|00001e50| 74 65 2d 63 6f 64 65 20 | 22 c0 09 21 88 c2 c3 5c |te-code |"..!...\|
|00001e60| 66 21 40 21 87 22 20 5b | 70 6f 70 2d 74 6f 2d 62 |f!@!." [|pop-to-b|
|00001e70| 75 66 66 65 72 20 67 6e | 75 73 2d 73 75 6d 6d 61 |uffer gn|us-summa|
|00001e80| 72 79 2d 62 75 66 66 65 | 72 20 65 76 61 6c 20 72 |ry-buffe|r eval r|
|00001e90| 65 61 64 2d 66 72 6f 6d | 2d 73 74 72 69 6e 67 20 |ead-from|-string |
|00001ea0| 73 74 72 69 6e 67 5d 20 | 33 29 29 5d 20 33 20 28 |string] |3))] 3 (|
|00001eb0| 23 24 20 2e 20 37 36 33 | 31 29 20 6e 69 6c 5d 29 |#$ . 763|1) nil])|
|00001ec0| 0a 23 40 36 35 20 41 70 | 70 6c 79 20 73 65 78 70 |.#@65 Ap|ply sexp|
|00001ed0| 20 62 65 66 6f 72 65 20 | 70 6f 69 6e 74 20 69 6e | before |point in|
|00001ee0| 20 63 75 72 72 65 6e 74 | 20 62 75 66 66 65 72 20 | current| buffer |
|00001ef0| 74 6f 20 63 75 72 72 65 | 6e 74 20 6e 65 77 73 67 |to curre|nt newsg|
|00001f00| 72 6f 75 70 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |roup...(|defalias|
|00001f10| 20 27 67 6e 75 73 2d 6b | 69 6c 6c 2d 66 69 6c 65 | 'gnus-k|ill-file|
|00001f20| 2d 61 70 70 6c 79 2d 6c | 61 73 74 2d 73 65 78 70 |-apply-l|ast-sexp|
|00001f30| 20 23 5b 6e 69 6c 20 22 | 08 83 19 00 c1 5c 6e 21 | #[nil "|.....\n!|
|00001f40| 83 19 00 8a c3 c4 21 88 | 60 29 60 7b 1d 8a c6 8b |......!.|`)`{....|
|00001f50| 2a 87 c7 20 88 c8 c9 ca | 5c 22 87 22 20 5b 67 6e |*.. ....|\"." [gn|
|00001f60| 75 73 2d 63 75 72 72 65 | 6e 74 2d 6b 69 6c 6c 2d |us-curre|nt-kill-|
|00001f70| 61 72 74 69 63 6c 65 20 | 67 65 74 2d 62 75 66 66 |article |get-buff|
|00001f80| 65 72 20 67 6e 75 73 2d | 73 75 6d 6d 61 72 79 2d |er gnus-|summary-|
|00001f90| 62 75 66 66 65 72 20 66 | 6f 72 77 61 72 64 2d 73 |buffer f|orward-s|
|00001fa0| 65 78 70 20 2d 31 20 73 | 74 72 69 6e 67 20 28 28 |exp -1 s|tring ((|
|00001fb0| 62 79 74 65 2d 63 6f 64 | 65 20 22 c0 09 21 88 c2 |byte-cod|e "..!..|
|00001fc0| c3 5c 66 21 40 21 87 22 | 20 5b 70 6f 70 2d 74 6f |.\f!@!."| [pop-to|
|00001fd0| 2d 62 75 66 66 65 72 20 | 67 6e 75 73 2d 73 75 6d |-buffer |gnus-sum|
|00001fe0| 6d 61 72 79 2d 62 75 66 | 66 65 72 20 65 76 61 6c |mary-buf|fer eval|
|00001ff0| 20 72 65 61 64 2d 66 72 | 6f 6d 2d 73 74 72 69 6e | read-fr|om-strin|
|00002000| 67 20 73 74 72 69 6e 67 | 5d 20 33 29 29 20 64 69 |g string|] 3)) di|
|00002010| 6e 67 20 67 6e 75 73 2d | 6d 65 73 73 61 67 65 20 |ng gnus-|message |
|00002020| 32 20 22 4e 6f 20 6e 65 | 77 73 67 72 6f 75 70 20 |2 "No ne|wsgroup |
|00002030| 69 73 20 73 65 6c 65 63 | 74 65 64 2e 22 5d 20 33 |is selec|ted."] 3|
|00002040| 20 28 23 24 20 2e 20 37 | 38 37 38 29 20 6e 69 6c | (#$ . 7|878) nil|
|00002050| 5d 29 0a 23 40 35 35 20 | 53 61 76 65 20 61 20 6b |]).#@55 |Save a k|
|00002060| 69 6c 6c 20 66 69 6c 65 | 2c 20 74 68 65 6e 20 72 |ill file|, then r|
|00002070| 65 74 75 72 6e 20 74 6f | 20 74 68 65 20 70 72 65 |eturn to| the pre|
|00002080| 76 69 6f 75 73 20 62 75 | 66 66 65 72 2e 1f 0a 28 |vious bu|ffer...(|
|00002090| 64 65 66 61 6c 69 61 73 | 20 27 67 6e 75 73 2d 6b |defalias| 'gnus-k|
|000020a0| 69 6c 6c 2d 66 69 6c 65 | 2d 65 78 69 74 20 23 5b |ill-file|-exit #[|
|000020b0| 6e 69 6c 20 22 c0 20 88 | 70 19 c2 0b 21 83 0f 00 |nil ". .|p...!...|
|000020c0| c4 0b 21 88 c5 09 21 88 | 0e 06 83 1d 00 c7 0e 06 |..!...!.|........|
|000020d0| 21 88 c8 16 06 c9 09 21 | 29 87 22 20 5b 73 61 76 |!......!|)." [sav|
|000020e0| 65 2d 62 75 66 66 65 72 | 20 6b 69 6c 6c 62 75 66 |e-buffer| killbuf|
|000020f0| 20 67 65 74 2d 62 75 66 | 66 65 72 20 67 6e 75 73 | get-buf|fer gnus|
|00002100| 2d 61 72 74 69 63 6c 65 | 2d 62 75 66 66 65 72 20 |-article|-buffer |
|00002110| 62 75 72 79 2d 62 75 66 | 66 65 72 20 64 65 6c 65 |bury-buf|fer dele|
|00002120| 74 65 2d 77 69 6e 64 6f | 77 73 2d 6f 6e 20 67 6e |te-windo|ws-on gn|
|00002130| 75 73 2d 77 69 6e 63 6f | 6e 66 2d 6b 69 6c 6c 2d |us-winco|nf-kill-|
|00002140| 66 69 6c 65 20 73 65 74 | 2d 77 69 6e 64 6f 77 2d |file set|-window-|
|00002150| 63 6f 6e 66 69 67 75 72 | 61 74 69 6f 6e 20 6e 69 |configur|ation ni|
|00002160| 6c 20 6b 69 6c 6c 2d 62 | 75 66 66 65 72 5d 20 32 |l kill-b|uffer] 2|
|00002170| 20 28 23 24 20 2e 20 38 | 32 38 30 29 20 6e 69 6c | (#$ . 8|280) nil|
|00002180| 5d 29 0a 23 40 31 30 35 | 20 52 65 74 75 72 6e 20 |]).#@105| Return |
|00002190| 74 68 65 20 6e 61 6d 65 | 20 6f 66 20 61 20 6b 69 |the name| of a ki|
|000021a0| 6c 6c 20 66 69 6c 65 20 | 66 6f 72 20 4e 45 57 53 |ll file |for NEWS|
|000021b0| 47 52 4f 55 50 2e 0a 49 | 66 20 4e 45 57 53 47 52 |GROUP..I|f NEWSGR|
|000021c0| 4f 55 50 20 69 73 20 6e | 69 6c 2c 20 72 65 74 75 |OUP is n|il, retu|
|000021d0| 72 6e 20 74 68 65 20 67 | 6c 6f 62 61 6c 20 6b 69 |rn the g|lobal ki|
|000021e0| 6c 6c 20 66 69 6c 65 20 | 69 6e 73 74 65 61 64 2e |ll file |instead.|
|000021f0| 1f 0a 28 64 65 66 61 6c | 69 61 73 20 27 67 6e 75 |..(defal|ias 'gnu|
|00002200| 73 2d 4e 65 77 73 67 72 | 6f 75 70 2d 6b 69 6c 6c |s-Newsgr|oup-kill|
|00002210| 2d 66 69 6c 65 20 23 5b | 28 6e 65 77 73 67 72 6f |-file #[|(newsgro|
|00002220| 75 70 29 20 22 08 83 5c | 6e 00 08 c1 98 83 0f 00 |up) "..\|n.......|
|00002230| c2 0b 5c 66 5c 22 87 0d | 83 1d 00 c2 c6 08 21 c7 |..\f\"..|......!.|
|00002240| 0b 51 5c 66 5c 22 87 c2 | c8 08 21 c9 0b 51 5c 66 |.Q\f\"..|..!..Q\f|
|00002250| 5c 22 87 22 20 5b 6e 65 | 77 73 67 72 6f 75 70 20 |\"." [ne|wsgroup |
|00002260| 22 22 20 65 78 70 61 6e | 64 2d 66 69 6c 65 2d 6e |"" expan|d-file-n|
|00002270| 61 6d 65 20 67 6e 75 73 | 2d 6b 69 6c 6c 2d 66 69 |ame gnus|-kill-fi|
|00002280| 6c 65 2d 6e 61 6d 65 20 | 67 6e 75 73 2d 6b 69 6c |le-name |gnus-kil|
|00002290| 6c 2d 66 69 6c 65 73 2d | 64 69 72 65 63 74 6f 72 |l-files-|director|
|000022a0| 79 20 67 6e 75 73 2d 75 | 73 65 2d 6c 6f 6e 67 2d |y gnus-u|se-long-|
|000022b0| 66 69 6c 65 2d 6e 61 6d | 65 20 67 6e 75 73 2d 63 |file-nam|e gnus-c|
|000022c0| 61 70 69 74 61 6c 69 7a | 65 2d 6e 65 77 73 67 72 |apitaliz|e-newsgr|
|000022d0| 6f 75 70 20 22 2e 22 20 | 67 6e 75 73 2d 6e 65 77 |oup "." |gnus-new|
|000022e0| 73 67 72 6f 75 70 2d 64 | 69 72 65 63 74 6f 72 79 |sgroup-d|irectory|
|000022f0| 2d 66 6f 72 6d 20 22 2f | 22 5d 20 34 20 28 23 24 |-form "/|"] 4 (#$|
|00002300| 20 2e 20 38 35 38 35 29 | 5d 29 0a 23 40 33 33 20 | . 8585)|]).#@33 |
|00002310| 52 65 6d 6f 76 65 20 6c | 69 6e 65 73 20 6d 61 72 |Remove l|ines mar|
|00002320| 6b 65 64 20 77 69 74 68 | 20 4d 41 52 4b 53 2e 1f |ked with| MARKS..|
|00002330| 0a 28 64 65 66 61 6c 69 | 61 73 20 27 67 6e 75 73 |.(defali|as 'gnus|
|00002340| 2d 65 78 70 75 6e 67 65 | 20 23 5b 28 6d 61 72 6b |-expunge| #[(mark|
|00002350| 73 29 20 22 8a 08 71 88 | c1 5c 6e c3 5c 22 29 87 |s) "..q.|.\n.\").|
|00002360| 22 20 5b 67 6e 75 73 2d | 73 75 6d 6d 61 72 79 2d |" [gnus-|summary-|
|00002370| 62 75 66 66 65 72 20 67 | 6e 75 73 2d 73 75 6d 6d |buffer g|nus-summ|
|00002380| 61 72 79 2d 6c 69 6d 69 | 74 2d 74 6f 2d 6d 61 72 |ary-limi|t-to-mar|
|00002390| 6b 73 20 6d 61 72 6b 73 | 20 72 65 76 65 72 73 65 |ks marks| reverse|
|000023a0| 5d 20 33 20 28 23 24 20 | 2e 20 38 39 37 36 29 5d |] 3 (#$ |. 8976)]|
|000023b0| 29 0a 23 40 37 31 20 41 | 70 70 6c 79 20 2e 4b 49 |).#@71 A|pply .KI|
|000023c0| 4c 4c 20 66 69 6c 65 2c | 20 75 6e 6c 65 73 73 20 |LL file,| unless |
|000023d0| 61 20 2e 53 43 4f 52 45 | 20 66 69 6c 65 20 66 6f |a .SCORE| file fo|
|000023e0| 72 20 74 68 65 20 73 61 | 6d 65 20 6e 65 77 73 67 |r the sa|me newsg|
|000023f0| 72 6f 75 70 20 65 78 69 | 73 74 73 2e 1f 0a 28 64 |roup exi|sts...(d|
|00002400| 65 66 61 6c 69 61 73 20 | 27 67 6e 75 73 2d 61 70 |efalias |'gnus-ap|
|00002410| 70 6c 79 2d 6b 69 6c 6c | 2d 66 69 6c 65 2d 75 6e |ply-kill|-file-un|
|00002420| 6c 65 73 73 2d 73 63 6f | 72 65 64 20 23 5b 6e 69 |less-sco|red #[ni|
|00002430| 6c 20 22 c0 c1 5c 6e 21 | 21 83 18 00 c0 c3 5c 6e |l "..\n!|!.....\n|
|00002440| 21 21 83 16 00 c4 c5 c6 | 5c 6e 23 88 c7 87 c0 c3 |!!......|\n#.....|
|00002450| c8 21 21 84 28 00 c0 c3 | 5c 6e 21 21 83 2b 00 c9 |.!!.(...|\n!!.+..|
|00002460| 20 87 c7 87 22 20 5b 66 | 69 6c 65 2d 65 78 69 73 | ..." [f|ile-exis|
|00002470| 74 73 2d 70 20 67 6e 75 | 73 2d 73 63 6f 72 65 2d |ts-p gnu|s-score-|
|00002480| 66 69 6c 65 2d 6e 61 6d | 65 20 67 6e 75 73 2d 6e |file-nam|e gnus-n|
|00002490| 65 77 73 67 72 6f 75 70 | 2d 6e 61 6d 65 20 67 6e |ewsgroup|-name gn|
|000024a0| 75 73 2d 6e 65 77 73 67 | 72 6f 75 70 2d 6b 69 6c |us-newsg|roup-kil|
|000024b0| 6c 2d 66 69 6c 65 20 67 | 6e 75 73 2d 6d 65 73 73 |l-file g|nus-mess|
|000024c0| 61 67 65 20 33 20 22 4e | 6f 74 65 3a 20 49 67 6e |age 3 "N|ote: Ign|
|000024d0| 6f 72 69 6e 67 20 25 73 | 2e 4b 49 4c 4c 3b 20 70 |oring %s|.KILL; p|
|000024e0| 72 65 66 65 72 72 69 6e | 67 20 2e 53 43 4f 52 45 |referrin|g .SCORE|
|000024f0| 22 20 30 20 6e 69 6c 20 | 67 6e 75 73 2d 61 70 70 |" 0 nil |gnus-app|
|00002500| 6c 79 2d 6b 69 6c 6c 2d | 66 69 6c 65 2d 69 6e 74 |ly-kill-|file-int|
|00002510| 65 72 6e 61 6c 5d 20 34 | 20 28 23 24 20 2e 20 39 |ernal] 4| (#$ . 9|
|00002520| 31 34 33 29 5d 29 0a 23 | 40 39 32 20 41 70 70 6c |143)]).#|@92 Appl|
|00002530| 79 20 61 20 6b 69 6c 6c | 20 66 69 6c 65 20 74 6f |y a kill| file to|
|00002540| 20 74 68 65 20 63 75 72 | 72 65 6e 74 20 6e 65 77 | the cur|rent new|
|00002550| 73 67 72 6f 75 70 2e 0a | 52 65 74 75 72 6e 73 20 |sgroup..|Returns |
|00002560| 74 68 65 20 6e 75 6d 62 | 65 72 20 6f 66 20 61 72 |the numb|er of ar|
|00002570| 74 69 63 6c 65 73 20 6d | 61 72 6b 65 64 20 61 73 |ticles m|arked as|
|00002580| 20 72 65 61 64 2e 1f 0a | 28 64 65 66 61 6c 69 61 | read...|(defalia|
|00002590| 73 20 27 67 6e 75 73 2d | 61 70 70 6c 79 2d 6b 69 |s 'gnus-|apply-ki|
|000025a0| 6c 6c 2d 66 69 6c 65 2d | 69 6e 74 65 72 6e 61 6c |ll-file-|internal|
|000025b0| 20 23 5b 6e 69 6c 20 22 | c0 c1 21 c0 5c 6e 21 44 | #[nil "|..!.\n!D|
|000025c0| 1b 5c 66 47 1d c6 1e 07 | c1 1e 08 c1 16 09 0b 1e |.\fG....|........|
|000025d0| 5c 6e 0e 5c 6e 83 6b 00 | cb 0e 5c 6e 40 21 83 62 |\n.\n.k.|..\n@!.b|
|000025e0| 00 0e 5c 66 1e 0d 0e 0e | 83 37 00 cf d0 0e 0d 5c |..\f....|.7.....\|
|000025f0| 22 16 09 82 5b 00 0e 0d | 83 5b 00 d1 0e 0d 40 d2 |"...[...|.[....@.|
|00002600| 48 0e 13 5c 22 84 52 00 | 0e 0d 40 d2 48 0e 09 42 |H..\".R.|..@.H..B|
|00002610| 16 09 0e 0d 41 89 16 0d | 84 3c 00 c1 16 5c 6e 29 |....A...|.<...\n)|
|00002620| 82 17 00 0e 5c 6e 41 89 | 16 5c 6e 84 1c 00 29 0e |....\nA.|.\n...).|
|00002630| 09 85 97 00 d4 8b 88 d5 | d6 21 88 0e 08 83 96 00 |........|.!......|
|00002640| 0d 5c 66 47 5a 89 1e 17 | d2 3d 84 90 00 d8 d9 da |.\fGZ...|.=......|
|00002650| 0e 17 23 88 0e 17 29 82 | 97 00 d2 2c 87 22 20 5b |..#...).|...,." [|
|00002660| 67 6e 75 73 2d 6e 65 77 | 73 67 72 6f 75 70 2d 6b |gnus-new|sgroup-k|
|00002670| 69 6c 6c 2d 66 69 6c 65 | 20 6e 69 6c 20 67 6e 75 |ill-file| nil gnu|
|00002680| 73 2d 6e 65 77 73 67 72 | 6f 75 70 2d 6e 61 6d 65 |s-newsgr|oup-name|
|00002690| 20 6b 69 6c 6c 2d 66 69 | 6c 65 73 20 67 6e 75 73 | kill-fi|les gnus|
|000026a0| 2d 6e 65 77 73 67 72 6f | 75 70 2d 75 6e 72 65 61 |-newsgro|up-unrea|
|000026b0| 64 73 20 75 6e 72 65 61 | 64 73 20 74 20 67 6e 75 |ds unrea|ds t gnu|
|000026c0| 73 2d 73 75 6d 6d 61 72 | 79 2d 69 6e 68 69 62 69 |s-summar|y-inhibi|
|000026d0| 74 2d 68 69 67 68 6c 69 | 67 68 74 20 62 65 67 20 |t-highli|ght beg |
|000026e0| 67 6e 75 73 2d 6e 65 77 | 73 67 72 6f 75 70 2d 6b |gnus-new|sgroup-k|
|000026f0| 69 6c 6c 2d 68 65 61 64 | 65 72 73 20 66 69 6c 65 |ill-head|ers file|
|00002700| 73 20 66 69 6c 65 2d 65 | 78 69 73 74 73 2d 70 20 |s file-e|xists-p |
|00002710| 67 6e 75 73 2d 6e 65 77 | 73 67 72 6f 75 70 2d 68 |gnus-new|sgroup-h|
|00002720| 65 61 64 65 72 73 20 68 | 65 61 64 65 72 73 20 67 |eaders h|eaders g|
|00002730| 6e 75 73 2d 6b 69 6c 6c | 2d 6b 69 6c 6c 65 64 20 |nus-kill|-killed |
|00002740| 6d 61 70 63 61 72 20 23 | 5b 28 68 65 61 64 65 72 |mapcar #|[(header|
|00002750| 29 20 22 08 c1 48 87 22 | 20 5b 68 65 61 64 65 72 |) "..H."| [header|
|00002760| 20 30 5d 20 32 5d 20 67 | 6e 75 73 2d 6d 65 6d 62 | 0] 2] g|nus-memb|
|00002770| 65 72 2d 6f 66 2d 72 61 | 6e 67 65 20 30 20 67 6e |er-of-ra|nge 0 gn|
|00002780| 75 73 2d 6e 65 77 73 67 | 72 6f 75 70 2d 6b 69 6c |us-newsg|roup-kil|
|00002790| 6c 65 64 20 28 28 62 79 | 74 65 2d 63 6f 64 65 20 |led ((by|te-code |
|000027a0| 22 8a 08 83 3d 00 c1 08 | 40 21 83 36 00 c2 c3 c4 |"...=...|@!.6....|
|000027b0| 08 40 23 88 c5 08 40 21 | 88 c6 20 88 65 62 88 c7 |.@#...@!|.. .eb..|
|000027c0| c8 c9 8f 3a 83 2c 00 ca | 20 88 82 2f 00 cb 20 88 |...:.,..| ../.. .|
|000027d0| c2 c3 cc 08 40 23 88 08 | 41 89 10 84 05 00 29 c7 |....@#..|A.....).|
|000027e0| 87 22 20 5b 6b 69 6c 6c | 2d 66 69 6c 65 73 20 66 |." [kill|-files f|
|000027f0| 69 6c 65 2d 65 78 69 73 | 74 73 2d 70 20 67 6e 75 |ile-exis|ts-p gnu|
|00002800| 73 2d 6d 65 73 73 61 67 | 65 20 36 20 22 50 72 6f |s-messag|e 6 "Pro|
|00002810| 63 65 73 73 69 6e 67 20 | 6b 69 6c 6c 20 66 69 6c |cessing |kill fil|
|00002820| 65 20 25 73 2e 2e 2e 22 | 20 66 69 6e 64 2d 66 69 |e %s..."| find-fi|
|00002830| 6c 65 20 67 6e 75 73 2d | 61 64 64 2d 63 75 72 72 |le gnus-|add-curr|
|00002840| 65 6e 74 2d 74 6f 2d 62 | 75 66 66 65 72 2d 6c 69 |ent-to-b|uffer-li|
|00002850| 73 74 20 6e 69 6c 20 28 | 62 79 74 65 2d 63 6f 64 |st nil (|byte-cod|
|00002860| 65 20 22 c0 70 21 87 22 | 20 5b 72 65 61 64 5d 20 |e ".p!."| [read] |
|00002870| 32 29 20 28 28 65 72 72 | 6f 72 29 29 20 67 6e 75 |2) ((err|or)) gnu|
|00002880| 73 2d 6b 69 6c 6c 2d 70 | 61 72 73 65 2d 67 6e 75 |s-kill-p|arse-gnu|
|00002890| 73 2d 6b 69 6c 6c 2d 66 | 69 6c 65 20 67 6e 75 73 |s-kill-f|ile gnus|
|000028a0| 2d 6b 69 6c 6c 2d 70 61 | 72 73 65 2d 72 6e 2d 6b |-kill-pa|rse-rn-k|
|000028b0| 69 6c 6c 2d 66 69 6c 65 | 20 22 50 72 6f 63 65 73 |ill-file| "Proces|
|000028c0| 73 69 6e 67 20 6b 69 6c | 6c 20 66 69 6c 65 20 25 |sing kil|l file %|
|000028d0| 73 2e 2e 2e 64 6f 6e 65 | 22 5d 20 35 29 29 20 67 |s...done|"] 5)) g|
|000028e0| 6e 75 73 2d 73 65 74 2d | 6d 6f 64 65 2d 6c 69 6e |nus-set-|mode-lin|
|000028f0| 65 20 73 75 6d 6d 61 72 | 79 20 6e 75 6e 72 65 61 |e summar|y nunrea|
|00002900| 64 73 20 67 6e 75 73 2d | 6d 65 73 73 61 67 65 20 |ds gnus-|message |
|00002910| 36 20 22 4d 61 72 6b 65 | 64 20 25 64 20 61 72 74 |6 "Marke|d %d art|
|00002920| 69 63 6c 65 73 20 61 73 | 20 72 65 61 64 22 5d 20 |icles as| read"] |
|00002930| 35 20 28 23 24 20 2e 20 | 39 35 31 36 29 5d 29 0a |5 (#$ . |9516)]).|
|00002940| 28 64 65 66 61 6c 69 61 | 73 20 27 67 6e 75 73 2d |(defalia|s 'gnus-|
|00002950| 73 63 6f 72 65 2d 69 6e | 73 65 72 74 2d 68 65 6c |score-in|sert-hel|
|00002960| 70 20 23 5b 28 73 74 72 | 69 6e 67 20 61 6c 69 73 |p #[(str|ing alis|
|00002970| 74 20 69 64 78 29 20 22 | 8a c0 c1 21 88 c2 70 21 |t idx) "|...!..p!|
|00002980| 88 c3 20 88 5c 66 c5 b1 | 02 88 0e 06 85 2f 00 c7 |.. .\f..|...../..|
|00002990| c8 0e 06 40 40 0e 09 0e | 06 40 38 23 63 88 0e 06 |...@@...|.@8#c...|
|000029a0| 41 89 16 06 84 16 00 ca | 29 87 22 20 5b 70 6f 70 |A.......|)." [pop|
|000029b0| 2d 74 6f 2d 62 75 66 66 | 65 72 20 22 2a 53 63 6f |-to-buff|er "*Sco|
|000029c0| 72 65 20 48 65 6c 70 2a | 22 20 62 75 66 66 65 72 |re Help*|" buffer|
|000029d0| 2d 64 69 73 61 62 6c 65 | 2d 75 6e 64 6f 20 65 72 |-disable|-undo er|
|000029e0| 61 73 65 2d 62 75 66 66 | 65 72 20 73 74 72 69 6e |ase-buff|er strin|
|000029f0| 67 20 22 3a 5c 6e 5c 6e | 22 20 61 6c 69 73 74 20 |g ":\n\n|" alist |
|00002a00| 66 6f 72 6d 61 74 20 22 | 20 25 63 3a 20 25 73 5c |format "| %c: %s\|
|00002a10| 6e 22 20 69 64 78 20 6e | 69 6c 5d 20 36 5d 29 0a |n" idx n|il] 6]).|
|00002a20| 28 64 65 66 61 6c 69 61 | 73 20 27 67 6e 75 73 2d |(defalia|s 'gnus-|
|00002a30| 6b 69 6c 6c 2d 70 61 72 | 73 65 2d 67 6e 75 73 2d |kill-par|se-gnus-|
|00002a40| 6b 69 6c 6c 2d 66 69 6c | 65 20 23 5b 6e 69 6c 20 |kill-fil|e #[nil |
|00002a50| 22 65 62 88 c0 20 88 c1 | 89 1a 1b 60 13 c1 c4 c5 |"eb.. ..|...`....|
|00002a60| 8f 89 12 83 52 00 5c 6e | 3c 84 1f 00 c6 c7 5c 6e |....R.\n|<.....\n|
|00002a70| 5c 22 88 5c 6e 40 c8 3d | 84 34 00 5c 6e 40 c9 3d |\".\n@.=|.4.\n@.=|
|00002a80| 84 34 00 5c 6e 40 ca 3d | 83 44 00 0b 60 7c 88 cb |.4.\n@.=|.D..`|..|
|00002a90| 5c 6e 21 86 3f 00 cc 63 | 88 82 5c 6e 00 8a 0e 0d |\n!.?..c|..\n....|
|00002aa0| 71 88 c1 ce cf 8f 88 29 | 82 5c 6e 00 d0 20 83 5f |q......)|.\n.. ._|
|00002ab0| 00 0e 11 83 5f 00 d2 20 | 88 d3 c1 21 2a 87 22 20 |...._.. |...!*." |
|00002ac0| 5b 67 6e 75 73 2d 6b 69 | 6c 6c 2d 66 69 6c 65 2d |[gnus-ki|ll-file-|
|00002ad0| 6d 6f 64 65 20 6e 69 6c | 20 66 6f 72 6d 20 62 65 |mode nil| form be|
|00002ae0| 67 20 28 62 79 74 65 2d | 63 6f 64 65 20 22 c0 70 |g (byte-|code ".p|
|00002af0| 21 87 22 20 5b 72 65 61 | 64 5d 20 32 29 20 28 28 |!." [rea|d] 2) ((|
|00002b00| 65 72 72 6f 72 29 29 20 | 65 72 72 6f 72 20 22 49 |error)) |error "I|
|00002b10| 6c 6c 65 67 61 6c 20 6b | 69 6c 6c 20 65 6e 74 72 |llegal k|ill entr|
|00002b20| 79 20 28 70 6f 73 73 69 | 62 6c 79 20 72 6e 20 6b |y (possi|bly rn k|
|00002b30| 69 6c 6c 20 66 69 6c 65 | 3f 29 3a 20 25 73 22 20 |ill file|?): %s" |
|00002b40| 67 6e 75 73 2d 6b 69 6c | 6c 20 67 6e 75 73 2d 72 |gnus-kil|l gnus-r|
|00002b50| 61 69 73 65 20 67 6e 75 | 73 2d 6c 6f 77 65 72 20 |aise gnu|s-lower |
|00002b60| 65 76 61 6c 20 22 22 20 | 67 6e 75 73 2d 73 75 6d |eval "" |gnus-sum|
|00002b70| 6d 61 72 79 2d 62 75 66 | 66 65 72 20 28 65 76 61 |mary-buf|fer (eva|
|00002b80| 6c 20 66 6f 72 6d 29 20 | 28 28 65 72 72 6f 72 29 |l form) |((error)|
|00002b90| 29 20 62 75 66 66 65 72 | 2d 6d 6f 64 69 66 69 65 |) buffer|-modifie|
|00002ba0| 64 2d 70 20 67 6e 75 73 | 2d 6b 69 6c 6c 2d 73 61 |d-p gnus|-kill-sa|
|00002bb0| 76 65 2d 6b 69 6c 6c 2d | 66 69 6c 65 20 73 61 76 |ve-kill-|file sav|
|00002bc0| 65 2d 62 75 66 66 65 72 | 20 73 65 74 2d 62 75 66 |e-buffer| set-buf|
|00002bd0| 66 65 72 2d 6d 6f 64 69 | 66 69 65 64 2d 70 5d 20 |fer-modi|fied-p] |
|00002be0| 33 5d 29 0a 28 64 65 66 | 61 6c 69 61 73 20 27 67 |3]).(def|alias 'g|
|00002bf0| 6e 75 73 2d 6b 69 6c 6c | 2d 70 61 72 73 65 2d 72 |nus-kill|-parse-r|
|00002c00| 6e 2d 6b 69 6c 6c 2d 66 | 69 6c 65 20 23 5b 6e 69 |n-kill-f|ile #[ni|
|00002c10| 6c 20 22 65 62 88 c0 20 | 88 c1 c2 c3 89 89 1c 1d |l "eb.. |........|
|00002c20| 1e 06 1e 07 1e 08 6d 3f | 85 68 00 c9 ca 21 83 62 |......m?|.h...!.b|
|00002c30| 00 cb 94 cb 95 7b 16 06 | cc 94 83 30 00 cc 94 66 |.....{..|...0...f|
|00002c40| 82 31 00 cd 15 ce 94 ce | 95 7b 14 cf d0 5c 66 5c |.1......|.{...\f\|
|00002c50| 22 83 46 00 d1 d2 d3 5c | 22 88 d4 14 d1 0d 0e 08 |".F....\|".......|
|00002c60| 9e 41 86 50 00 d5 0e 06 | cf d4 5c 66 5c 22 83 5d |.A.P....|..\f\".]|
|00002c70| 00 d6 82 5e 00 d7 c3 d8 | 25 88 cb 79 88 82 13 00 |...^....|%..y....|
|00002c80| 2d 87 22 20 5b 67 6e 75 | 73 2d 6b 69 6c 6c 2d 66 |-." [gnu|s-kill-f|
|00002c90| 69 6c 65 2d 6d 6f 64 65 | 20 28 28 39 37 20 2e 20 |ile-mode| ((97 . |
|00002ca0| 22 22 29 20 28 31 30 34 | 20 2e 20 22 22 29 20 28 |"") (104| . "") (|
|00002cb0| 31 30 32 20 2e 20 22 66 | 72 6f 6d 22 29 20 28 35 |102 . "f|rom") (5|
|00002cc0| 38 20 2e 20 22 73 75 62 | 6a 65 63 74 22 29 29 20 |8 . "sub|ject")) |
|00002cd0| 28 28 31 30 39 20 2e 20 | 22 20 22 29 20 28 31 30 |((109 . |" ") (10|
|00002ce0| 36 20 2e 20 22 58 22 29 | 29 20 6e 69 6c 20 63 6f |6 . "X")|) nil co|
|00002cf0| 6d 6d 61 6e 64 73 20 6d | 6f 64 69 66 69 65 72 20 |mmands m|odifier |
|00002d00| 70 61 74 74 65 72 6e 20 | 63 6f 6d 2d 74 6f 2d 63 |pattern |com-to-c|
|00002d10| 6f 6d 20 6d 6f 64 2d 74 | 6f 2d 68 65 61 64 65 72 |om mod-t|o-header|
|00002d20| 20 6c 6f 6f 6b 69 6e 67 | 2d 61 74 20 22 5b 20 09 | looking|-at "[ .|
|00002d30| 5d 2a 2f 5c 5c 28 5b 5e | 2f 5d 2a 5c 5c 29 2f 5c |]*/\\([^|/]*\\)/\|
|00002d40| 5c 28 5b 61 68 66 63 48 | 5d 5c 5c 29 3f 3a 5c 5c |\([ahfcH|]\\)?:\\|
|00002d50| 28 5b 61 2d 7a 3d 3a 5d | 2a 5c 5c 29 22 20 31 20 |([a-z=:]|*\\)" 1 |
|00002d60| 32 20 31 31 35 20 33 20 | 73 74 72 69 6e 67 2d 6d |2 115 3 |string-m|
|00002d70| 61 74 63 68 20 22 5c 5c | 2b 22 20 67 6e 75 73 2d |atch "\\|+" gnus-|
|00002d80| 6b 69 6c 6c 20 22 66 72 | 6f 6d 22 20 22 2e 22 20 |kill "fr|om" "." |
|00002d90| 22 6d 22 20 22 73 75 62 | 6a 65 63 74 22 20 28 67 |"m" "sub|ject" (g|
|00002da0| 6e 75 73 2d 73 75 6d 6d | 61 72 79 2d 6d 61 72 6b |nus-summ|ary-mark|
|00002db0| 2d 61 73 2d 75 6e 72 65 | 61 64 20 6e 69 6c 20 22 |-as-unre|ad nil "|
|00002dc0| 20 22 29 20 28 67 6e 75 | 73 2d 73 75 6d 6d 61 72 | ") (gnu|s-summar|
|00002dd0| 79 2d 6d 61 72 6b 2d 61 | 73 2d 72 65 61 64 20 6e |y-mark-a|s-read n|
|00002de0| 69 6c 20 22 58 22 29 20 | 74 5d 20 36 5d 29 0a 23 |il "X") |t] 6]).#|
|00002df0| 40 33 36 37 20 49 66 20 | 46 49 45 4c 44 20 6f 66 |@367 If |FIELD of|
|00002e00| 20 61 6e 20 61 72 74 69 | 63 6c 65 20 6d 61 74 63 | an arti|cle matc|
|00002e10| 68 65 73 20 52 45 47 45 | 58 50 2c 20 65 78 65 63 |hes REGE|XP, exec|
|00002e20| 75 74 65 20 43 4f 4d 4d | 41 4e 44 2e 0a 4f 70 74 |ute COMM|AND..Opt|
|00002e30| 69 6f 6e 61 6c 20 31 73 | 74 20 61 72 67 75 6d 65 |ional 1s|t argume|
|00002e40| 6e 74 20 43 4f 4d 4d 41 | 4e 44 20 69 73 20 64 65 |nt COMMA|ND is de|
|00002e50| 66 61 75 6c 74 20 74 6f | 0a 09 28 67 6e 75 73 2d |fault to|..(gnus-|
|00002e60| 73 75 6d 6d 61 72 79 2d | 6d 61 72 6b 2d 61 73 2d |summary-|mark-as-|
|00002e70| 72 65 61 64 20 6e 69 6c | 20 22 58 22 29 2e 0a 49 |read nil| "X")..I|
|00002e80| 66 20 6f 70 74 69 6f 6e | 61 6c 20 32 6e 64 20 61 |f option|al 2nd a|
|00002e90| 72 67 75 6d 65 6e 74 20 | 41 4c 4c 20 69 73 20 6e |rgument |ALL is n|
|00002ea0| 6f 6e 2d 6e 69 6c 2c 20 | 61 72 74 69 63 6c 65 73 |on-nil, |articles|
|00002eb0| 20 6d 61 72 6b 65 64 20 | 61 72 65 20 61 6c 73 6f | marked |are also|
|00002ec0| 20 61 70 70 6c 69 65 64 | 20 74 6f 2e 0a 49 66 20 | applied| to..If |
|00002ed0| 46 49 45 4c 44 20 69 73 | 20 61 6e 20 65 6d 70 74 |FIELD is| an empt|
|00002ee0| 79 20 73 74 72 69 6e 67 | 20 28 6f 72 20 6e 69 6c |y string| (or nil|
|00002ef0| 29 2c 20 65 6e 74 69 72 | 65 20 61 72 74 69 63 6c |), entir|e articl|
|00002f00| 65 20 62 6f 64 79 20 69 | 73 20 73 65 61 72 63 68 |e body i|s search|
|00002f10| 65 64 20 66 6f 72 2e 0a | 43 4f 4d 4d 41 4e 44 20 |ed for..|COMMAND |
|00002f20| 6d 75 73 74 20 62 65 20 | 61 20 6c 69 73 70 20 65 |must be |a lisp e|
|00002f30| 78 70 72 65 73 73 69 6f | 6e 20 6f 72 20 61 20 73 |xpressio|n or a s|
|00002f40| 74 72 69 6e 67 20 72 65 | 70 72 65 73 65 6e 74 69 |tring re|presenti|
|00002f50| 6e 67 20 61 20 6b 65 79 | 20 73 65 71 75 65 6e 63 |ng a key| sequenc|
|00002f60| 65 2e 1f 0a 28 64 65 66 | 61 6c 69 61 73 20 27 67 |e...(def|alias 'g|
|00002f70| 6e 75 73 2d 6b 69 6c 6c | 20 23 5b 28 66 69 65 6c |nus-kill| #[(fiel|
|00002f80| 64 20 72 65 67 65 78 70 | 20 26 6f 70 74 69 6f 6e |d regexp| &option|
|00002f90| 61 6c 20 65 78 65 2d 63 | 6f 6d 6d 61 6e 64 20 61 |al exe-c|ommand a|
|00002fa0| 6c 6c 20 73 69 6c 65 6e | 74 29 20 22 70 18 8a c1 |ll silen|t) "p...|
|00002fb0| 8b 88 29 c2 08 21 88 0b | c4 3d 85 45 00 0d 85 45 |..)..!..|.=.E...E|
|00002fc0| 00 0e 06 3f 85 45 00 c7 | c8 0e 09 0d 3a 83 2a 00 |...?.E..|....:.*.|
|00002fd0| ca 0d 44 82 2b 00 0d 45 | 0e 0b 84 36 00 0e 5c 66 |..D.+..E|...6..\f|
|00002fe0| 85 3b 00 ca 0e 0b 44 43 | a4 0e 5c 66 85 43 00 cd |.;....DC|..\f.C..|
|00002ff0| 43 a4 21 29 87 22 20 5b | 6f 6c 64 2d 62 75 66 66 |C.!)." [|old-buff|
|00003000| 65 72 20 28 28 62 79 74 | 65 2d 63 6f 64 65 20 22 |er ((byt|e-code "|
|00003010| c0 09 c2 5c 22 88 65 62 | 88 0b c4 20 0d 86 10 00 |...\".eb|... ....|
|00003020| c6 c7 89 89 1e 08 1e 09 | 1e 5c 6e 1e 0b 1e 5c 66 |........|.\n...\f|
|00003030| 89 1e 0d 3c 83 c2 00 0e | 0d 41 3a 84 58 00 ce 0e |...<....|.A:.X...|
|00003040| 0f 0e 0d 40 0e 0b c7 0e | 10 3f 25 d1 55 83 4f 00 |...@....|.?%.U.O.|
|00003050| d2 0e 5c 66 0e 0d 41 5c | 22 0e 13 56 83 cf 00 c7 |..\f..A\|"..V....|
|00003060| 13 82 cf 00 0e 0d 0e 5c | 66 a1 88 82 cf 00 0e 0d |.......\|f.......|
|00003070| 40 89 16 5c 6e 83 cf 00 | 0e 5c 6e 3a 83 a8 00 0e |@..\n...|.\n:....|
|00003080| 5c 6e 41 16 09 ce 0e 0f | 0e 5c 6e 40 0e 0b c7 0e |\nA.....|.\n@....|
|00003090| 10 3f 25 d1 55 83 9f 00 | d2 0e 5c 66 0e 09 5c 22 |.?%.U...|..\f..\"|
|000030a0| 0e 13 56 83 b5 00 0e 08 | 83 99 00 0e 08 0e 0d 41 |..V.....|.......A|
|000030b0| a1 88 82 b5 00 0b 41 13 | 82 b5 00 0e 5c 6e 0e 5c |......A.|....\n.\|
|000030c0| 66 a1 88 82 b5 00 ce 0e | 0f 0e 5c 6e 0e 0b c7 0e |f.......|..\n....|
|000030d0| 10 3f 25 88 0e 0d 16 08 | 0e 0d 41 89 16 0d 82 5a |.?%.....|..A....Z|
|000030e0| 00 ce 0e 0f 0e 0d 0e 0b | c7 0e 10 3f 25 88 2e 06 |........|...?%...|
|000030f0| c7 87 22 20 5b 73 77 69 | 74 63 68 2d 74 6f 2d 62 |.." [swi|tch-to-b|
|00003100| 75 66 66 65 72 20 67 6e | 75 73 2d 73 75 6d 6d 61 |uffer gn|us-summa|
|00003110| 72 79 2d 62 75 66 66 65 | 72 20 6e 6f 72 65 63 6f |ry-buffe|r noreco|
|00003120| 72 64 20 72 65 67 65 78 | 70 20 63 75 72 72 65 6e |rd regex|p curren|
|00003130| 74 2d 74 69 6d 65 2d 73 | 74 72 69 6e 67 20 65 78 |t-time-s|tring ex|
|00003140| 65 2d 63 6f 6d 6d 61 6e | 64 20 28 67 6e 75 73 2d |e-comman|d (gnus-|
|00003150| 73 75 6d 6d 61 72 79 2d | 6d 61 72 6b 2d 61 73 2d |summary-|mark-as-|
|00003160| 72 65 61 64 20 6e 69 6c | 20 67 6e 75 73 2d 6b 69 |read nil| gnus-ki|
|00003170| 6c 6c 2d 66 69 6c 65 2d | 6d 61 72 6b 29 20 6e 69 |ll-file-|mark) ni|
|00003180| 6c 20 70 72 65 76 20 6b | 64 61 74 65 20 6b 69 6c |l prev k|date kil|
|00003190| 6c 20 63 6f 6d 6d 61 6e | 64 20 64 61 74 65 20 6b |l comman|d date k|
|000031a0| 69 6c 6c 2d 6c 69 73 74 | 20 67 6e 75 73 2d 65 78 |ill-list| gnus-ex|
|000031b0| 65 63 75 74 65 20 66 69 | 65 6c 64 20 61 6c 6c 20 |ecute fi|eld all |
|000031c0| 30 20 67 6e 75 73 2d 64 | 61 79 73 2d 62 65 74 77 |0 gnus-d|ays-betw|
|000031d0| 65 65 6e 20 67 6e 75 73 | 2d 6b 69 6c 6c 2d 65 78 |een gnus|-kill-ex|
|000031e0| 70 69 72 79 2d 64 61 79 | 73 5d 20 37 29 29 20 73 |piry-day|s] 7)) s|
|000031f0| 77 69 74 63 68 2d 74 6f | 2d 62 75 66 66 65 72 20 |witch-to|-buffer |
|00003200| 6d 61 6a 6f 72 2d 6d 6f | 64 65 20 67 6e 75 73 2d |major-mo|de gnus-|
|00003210| 6b 69 6c 6c 2d 66 69 6c | 65 2d 6d 6f 64 65 20 72 |kill-fil|e-mode r|
|00003220| 65 67 65 78 70 20 73 69 | 6c 65 6e 74 20 67 6e 75 |egexp si|lent gnu|
|00003230| 73 2d 70 70 2d 67 6e 75 | 73 2d 6b 69 6c 6c 20 67 |s-pp-gnu|s-kill g|
|00003240| 6e 75 73 2d 6b 69 6c 6c | 20 66 69 65 6c 64 20 71 |nus-kill| field q|
|00003250| 75 6f 74 65 20 65 78 65 | 2d 63 6f 6d 6d 61 6e 64 |uote exe|-command|
|00003260| 20 61 6c 6c 20 74 5d 20 | 35 20 28 23 24 20 2e 20 | all t] |5 (#$ . |
|00003270| 31 31 37 36 35 29 5d 29 | 0a 28 64 65 66 61 6c 69 |11765)])|.(defali|
|00003280| 61 73 20 27 67 6e 75 73 | 2d 70 70 2d 67 6e 75 73 |as 'gnus|-pp-gnus|
|00003290| 2d 6b 69 6c 6c 20 23 5b | 28 6f 62 6a 65 63 74 29 |-kill #[|(object)|
|000032a0| 20 22 c0 09 38 3a 83 5c | 22 00 c0 09 38 41 3a 83 | "..8:.\|"...8A:.|
|000032b0| 5c 22 00 c0 09 38 40 c2 | 3d 83 28 00 c0 09 38 41 |\"...8@.|=.(...8A|
|000032c0| 40 41 3a 84 28 00 c3 c4 | 09 21 50 87 8a c5 c6 21 |@A:.(...|.!P....!|
|000032d0| 71 88 c7 70 21 88 c8 20 | 88 c9 ca 09 40 09 41 40 |q..p!.. |....@.A@|
|000032e0| 23 63 88 c0 09 38 41 40 | cb 1e 5c 66 89 1e 0d 83 |#c...8A@|..\f....|
|000032f0| 6b 00 0e 5c 66 83 59 00 | ce 16 5c 66 cf 82 5a 00 |k..\f.Y.|..\f..Z.|
|00003300| d0 c4 0e 0d 40 21 b1 02 | 88 0e 0d 41 89 16 0d 84 |....@!..|...A....|
|00003310| 4d 00 2a d1 63 88 d2 09 | 38 83 93 00 d3 d2 09 38 |M.*.c...|8......8|
|00003320| 3a 83 8a 00 d2 09 38 40 | c2 3d 84 8a 00 d4 82 8b |:.....8@|.=......|
|00003330| 00 cf c4 d2 09 38 21 b1 | 03 88 d5 09 38 83 9c 00 |.....8!.|....8...|
|00003340| d6 63 88 d1 63 88 65 64 | 7b d7 70 21 88 29 87 22 |.c..c.ed|{.p!.)."|
|00003350| 20 5b 32 20 6f 62 6a 65 | 63 74 20 71 75 6f 74 65 | [2 obje|ct quote|
|00003360| 20 22 5c 6e 22 20 70 72 | 69 6e 31 2d 74 6f 2d 73 | "\n" pr|in1-to-s|
|00003370| 74 72 69 6e 67 20 67 65 | 74 2d 62 75 66 66 65 72 |tring ge|t-buffer|
|00003380| 2d 63 72 65 61 74 65 20 | 22 2a 47 6e 75 73 20 50 |-create |"*Gnus P|
|00003390| 50 2a 22 20 62 75 66 66 | 65 72 2d 64 69 73 61 62 |P*" buff|er-disab|
|000033a0| 6c 65 2d 75 6e 64 6f 20 | 65 72 61 73 65 2d 62 75 |le-undo |erase-bu|
|000033b0| 66 66 65 72 20 66 6f 72 | 6d 61 74 20 22 5c 6e 28 |ffer for|mat "\n(|
|000033c0| 25 53 20 25 53 5c 6e 20 | 20 27 28 22 20 74 20 66 |%S %S\n | '(" t f|
|000033d0| 69 72 73 74 20 6b 6c 69 | 73 74 20 6e 69 6c 20 22 |irst kli|st nil "|
|000033e0| 22 20 22 5c 6e 20 20 20 | 20 22 20 22 29 22 20 33 |" "\n | " ")" 3|
|000033f0| 20 22 5c 6e 20 20 22 20 | 22 27 22 20 34 20 22 5c | "\n " |"'" 4 "\|
|00003400| 6e 20 20 74 22 20 6b 69 | 6c 6c 2d 62 75 66 66 65 |n t" ki|ll-buffe|
|00003410| 72 5d 20 36 5d 29 0a 28 | 64 65 66 61 6c 69 61 73 |r] 6]).(|defalias|
|00003420| 20 27 67 6e 75 73 2d 65 | 78 65 63 75 74 65 2d 31 | 'gnus-e|xecute-1|
|00003430| 20 23 5b 28 66 75 6e 63 | 74 69 6f 6e 20 72 65 67 | #[(func|tion reg|
|00003440| 65 78 70 20 66 6f 72 6d | 20 68 65 61 64 65 72 29 |exp form| header)|
|00003450| 20 22 8a c0 19 5c 6e 83 | ab 00 0b 83 65 00 c0 1c | "...\n.|....e...|
|00003460| 5c 6e 83 61 00 0b 5c 6e | 21 89 14 3b 84 1e 00 c5 |\n.a..\n|!..;....|
|00003470| 5c 66 21 14 c6 0e 07 5c | 66 5c 22 89 11 83 61 00 |\f!....\|f\"...a.|
|00003480| 0e 08 3b 83 36 00 c9 0e | 08 21 88 82 61 00 0e 08 |..;.6...|.!..a...|
|00003490| 89 1e 08 39 83 46 00 ca | 0e 08 21 86 51 00 0e 08 |...9.F..|..!.Q...|
|000034a0| 3c 85 51 00 0e 08 40 cb | 3d 29 83 5c 5c 00 0e 08 |<.Q...@.|=).\\...|
|000034b0| 20 88 82 61 00 cc 0e 08 | 21 88 29 82 ab 00 c0 89 | ..a....|!.).....|
|000034c0| 89 89 1e 0d 1e 0e 1e 0f | 1e 10 d1 d2 d3 5c 6e d4 |........|.....\n.|
|000034d0| 48 23 88 d5 20 88 d6 5c | 6e d4 48 d7 5c 22 88 8a |H#.. ..\|n.H.\"..|
|000034e0| 0e 18 71 88 65 62 88 d9 | 0e 07 c0 d7 23 89 11 29 |..q.eb..|....#..)|
|000034f0| 83 aa 00 0e 08 3b 83 a5 | 00 c9 0e 08 21 88 82 aa |.....;..|....!...|
|00003500| 00 cc 0e 08 21 88 2c 09 | 2a 87 22 20 5b 6e 69 6c |....!.,.|*." [nil|
|00003510| 20 64 69 64 2d 6b 69 6c | 6c 20 68 65 61 64 65 72 | did-kil|l header|
|00003520| 20 66 75 6e 63 74 69 6f | 6e 20 76 61 6c 75 65 20 | functio|n value |
|00003530| 70 72 69 6e 31 2d 74 6f | 2d 73 74 72 69 6e 67 20 |prin1-to|-string |
|00003540| 73 74 72 69 6e 67 2d 6d | 61 74 63 68 20 72 65 67 |string-m|atch reg|
|00003550| 65 78 70 20 66 6f 72 6d | 20 65 78 65 63 75 74 65 |exp form| execute|
|00003560| 2d 6b 62 64 2d 6d 61 63 | 72 6f 20 66 62 6f 75 6e |-kbd-mac|ro fboun|
|00003570| 64 70 20 6c 61 6d 62 64 | 61 20 65 76 61 6c 20 67 |dp lambd|a eval g|
|00003580| 6e 75 73 2d 6d 61 72 6b | 2d 61 72 74 69 63 6c 65 |nus-mark|-article|
|00003590| 2d 68 6f 6f 6b 20 67 6e | 75 73 2d 62 72 65 61 6b |-hook gn|us-break|
|000035a0| 2d 70 61 67 65 73 20 67 | 6e 75 73 2d 6c 61 73 74 |-pages g|nus-last|
|000035b0| 2d 61 72 74 69 63 6c 65 | 20 67 6e 75 73 2d 63 75 |-article| gnus-cu|
|000035c0| 72 72 65 6e 74 2d 61 72 | 74 69 63 6c 65 20 67 6e |rrent-ar|ticle gn|
|000035d0| 75 73 2d 6d 65 73 73 61 | 67 65 20 36 20 22 53 65 |us-messa|ge 6 "Se|
|000035e0| 61 72 63 68 69 6e 67 20 | 66 6f 72 20 61 72 74 69 |arching |for arti|
|000035f0| 63 6c 65 3a 20 25 64 2e | 2e 2e 22 20 30 20 67 6e |cle: %d.|.." 0 gn|
|00003600| 75 73 2d 61 72 74 69 63 | 6c 65 2d 73 65 74 75 70 |us-artic|le-setup|
|00003610| 2d 62 75 66 66 65 72 20 | 67 6e 75 73 2d 61 72 74 |-buffer |gnus-art|
|00003620| 69 63 6c 65 2d 70 72 65 | 70 61 72 65 20 74 20 67 |icle-pre|pare t g|
|00003630| 6e 75 73 2d 61 72 74 69 | 63 6c 65 2d 62 75 66 66 |nus-arti|cle-buff|
|00003640| 65 72 20 72 65 2d 73 65 | 61 72 63 68 2d 66 6f 72 |er re-se|arch-for|
|00003650| 77 61 72 64 5d 20 36 5d | 29 0a 23 40 33 32 37 20 |ward] 6]|).#@327 |
|00003660| 49 66 20 46 49 45 4c 44 | 20 6f 66 20 61 72 74 69 |If FIELD| of arti|
|00003670| 63 6c 65 20 68 65 61 64 | 65 72 20 6d 61 74 63 68 |cle head|er match|
|00003680| 65 73 20 52 45 47 45 58 | 50 2c 20 65 78 65 63 75 |es REGEX|P, execu|
|00003690| 74 65 20 6c 69 73 70 20 | 46 4f 52 4d 20 28 6f 72 |te lisp |FORM (or|
|000036a0| 20 61 20 73 74 72 69 6e | 67 29 2e 0a 49 66 20 46 | a strin|g)..If F|
|000036b0| 49 45 4c 44 20 69 73 20 | 61 6e 20 65 6d 70 74 79 |IELD is |an empty|
|000036c0| 20 73 74 72 69 6e 67 20 | 28 6f 72 20 6e 69 6c 29 | string |(or nil)|
|000036d0| 2c 20 65 6e 74 69 72 65 | 20 61 72 74 69 63 6c 65 |, entire| article|
|000036e0| 20 62 6f 64 79 20 69 73 | 20 73 65 61 72 63 68 65 | body is| searche|
|000036f0| 64 20 66 6f 72 2e 0a 49 | 66 20 6f 70 74 69 6f 6e |d for..I|f option|
|00003700| 61 6c 20 31 73 74 20 61 | 72 67 75 6d 65 6e 74 20 |al 1st a|rgument |
|00003710| 42 41 43 4b 57 41 52 44 | 20 69 73 20 6e 6f 6e 2d |BACKWARD| is non-|
|00003720| 6e 69 6c 2c 20 64 6f 20 | 62 61 63 6b 77 61 72 64 |nil, do |backward|
|00003730| 20 69 6e 73 74 65 61 64 | 2e 0a 49 66 20 6f 70 74 | instead|..If opt|
|00003740| 69 6f 6e 61 6c 20 32 6e | 64 20 61 72 67 75 6d 65 |ional 2n|d argume|
|00003750| 6e 74 20 49 47 4e 4f 52 | 45 2d 4d 41 52 4b 45 44 |nt IGNOR|E-MARKED|
|00003760| 20 69 73 20 6e 6f 6e 2d | 6e 69 6c 2c 20 61 72 74 | is non-|nil, art|
|00003770| 69 63 6c 65 73 20 77 68 | 69 63 68 20 61 72 65 0a |icles wh|ich are.|
|00003780| 6d 61 72 6b 65 64 20 61 | 73 20 72 65 61 64 20 6f |marked a|s read o|
|00003790| 72 20 74 69 63 6b 65 64 | 20 61 72 65 20 69 67 6e |r ticked| are ign|
|000037a0| 6f 72 65 64 2e 1f 0a 28 | 64 65 66 61 6c 69 61 73 |ored...(|defalias|
|000037b0| 20 27 67 6e 75 73 2d 65 | 78 65 63 75 74 65 20 23 | 'gnus-e|xecute #|
|000037c0| 5b 28 66 69 65 6c 64 20 | 72 65 67 65 78 70 20 66 |[(field |regexp f|
|000037d0| 6f 72 6d 20 26 6f 70 74 | 69 6f 6e 61 6c 20 62 61 |orm &opt|ional ba|
|000037e0| 63 6b 77 61 72 64 20 69 | 67 6e 6f 72 65 2d 6d 61 |ckward i|gnore-ma|
|000037f0| 72 6b 65 64 29 20 22 8a | c0 c1 89 89 1a 1b 1c 1d |rked) ".|........|
|00003800| 0e 06 83 15 00 0e 06 c7 | 98 83 1a 00 c1 14 82 38 |........|.......8|
|00003810| 00 c8 c9 ca 0e 06 97 50 | 21 89 14 21 83 32 00 cb |.......P|!..!.2..|
|00003820| cc 5c 66 cd 42 45 14 82 | 38 00 ce cf 0e 06 5c 22 |.\f.BE..|8.....\"|
|00003830| 88 0b 84 5a 00 d0 60 d1 | 5c 22 89 1e 12 83 4b 00 |...Z..`.|\"....K.|
|00003840| d3 0e 12 21 88 29 d0 60 | d4 5c 22 86 55 00 d5 20 |...!.).`|.\".U.. |
|00003850| 89 13 84 67 00 d6 0e 17 | 3f c1 0e 18 23 89 13 83 |...g....|?...#...|
|00003860| 91 00 0e 19 83 73 00 0b | 0e 19 3e 83 38 00 da db |.....s..|..>.8...|
|00003870| 0b 0e 1c 9e 38 89 12 21 | 83 38 00 dd 5c 66 0e 1e |....8..!|.8..\f..|
|00003880| 0e 1f 5c 6e 24 83 38 00 | 0d 54 15 82 38 00 0d 2d |..\n$.8.|.T..8..-|
|00003890| 87 22 20 5b 30 20 6e 69 | 6c 20 68 65 61 64 65 72 |." [0 ni|l header|
|000038a0| 20 61 72 74 69 63 6c 65 | 20 66 75 6e 63 74 69 6f | article| functio|
|000038b0| 6e 20 6b 69 6c 6c 65 64 | 2d 6e 6f 20 66 69 65 6c |n killed|-no fiel|
|000038c0| 64 20 22 22 20 66 62 6f | 75 6e 64 70 20 69 6e 74 |d "" fbo|undp int|
|000038d0| 65 72 6e 2d 73 6f 66 74 | 20 22 6d 61 69 6c 2d 68 |ern-soft| "mail-h|
|000038e0| 65 61 64 65 72 2d 22 20 | 6c 61 6d 62 64 61 20 28 |eader-" |lambda (|
|000038f0| 68 29 20 28 68 29 20 65 | 72 72 6f 72 20 22 55 6e |h) (h) e|rror "Un|
|00003900| 6b 6e 6f 77 6e 20 68 65 | 61 64 65 72 20 66 69 65 |known he|ader fie|
|00003910| 6c 64 3a 20 5c 22 25 73 | 5c 22 22 20 67 65 74 2d |ld: \"%s|\"" get-|
|00003920| 74 65 78 74 2d 70 72 6f | 70 65 72 74 79 20 67 6e |text-pro|perty gn|
|00003930| 75 73 2d 69 6e 74 61 6e | 67 69 62 6c 65 20 74 6f |us-intan|gible to|
|00003940| 20 67 6e 75 73 2d 73 75 | 6d 6d 61 72 79 2d 67 6f | gnus-su|mmary-go|
|00003950| 74 6f 2d 73 75 62 6a 65 | 63 74 20 67 6e 75 73 2d |to-subje|ct gnus-|
|00003960| 6e 75 6d 62 65 72 20 67 | 6e 75 73 2d 73 75 6d 6d |number g|nus-summ|
|00003970| 61 72 79 2d 6c 61 73 74 | 2d 73 75 62 6a 65 63 74 |ary-last|-subject|
|00003980| 20 67 6e 75 73 2d 73 75 | 6d 6d 61 72 79 2d 73 65 | gnus-su|mmary-se|
|00003990| 61 72 63 68 2d 66 6f 72 | 77 61 72 64 20 69 67 6e |arch-for|ward ign|
|000039a0| 6f 72 65 2d 6d 61 72 6b | 65 64 20 62 61 63 6b 77 |ore-mark|ed backw|
|000039b0| 61 72 64 20 67 6e 75 73 | 2d 6e 65 77 73 67 72 6f |ard gnus|-newsgro|
|000039c0| 75 70 2d 6b 69 6c 6c 2d | 68 65 61 64 65 72 73 20 |up-kill-|headers |
|000039d0| 76 65 63 74 6f 72 70 20 | 33 20 67 6e 75 73 2d 6e |vectorp |3 gnus-n|
|000039e0| 65 77 73 67 72 6f 75 70 | 2d 64 61 74 61 20 67 6e |ewsgroup|-data gn|
|000039f0| 75 73 2d 65 78 65 63 75 | 74 65 2d 31 20 72 65 67 |us-execu|te-1 reg|
|00003a00| 65 78 70 20 66 6f 72 6d | 5d 20 36 20 28 23 24 20 |exp form|] 6 (#$ |
|00003a10| 2e 20 31 33 39 32 30 29 | 5d 29 0a 28 70 72 6f 76 |. 13920)|]).(prov|
|00003a20| 69 64 65 20 28 71 75 6f | 74 65 20 67 6e 75 73 2d |ide (quo|te gnus-|
|00003a30| 6b 69 6c 6c 29 29 0a | |kill)). | |
+--------+-------------------------+-------------------------+--------+--------+
